Составьте программу вычисления периметр прямоугольника со сторонами А и В..

2

Ответы и объяснения

  • Kitsu
  • почетный грамотей
2012-12-03T09:46:44+00:00

var a,b:real;

begin

readln(a,b);

writeln('Perimetr - ',2*(a+b));

end.

2012-12-03T10:11:41+00:00

Program zadacha;

Var a,b,p: real;

begin

Readln(a,b);

p:=(a+b)*2;

Writeln('Perimetr=',p,);

End.