Для следующей задачи напишите программу на языке Паскаль: Определить периметр Р и площадь S прямоугольника со сторонами А=84 мм и В=152 мм

Question

Фетинья

8 апреля, 13:10

+3

Ответы (1)

Знаете ответ на вопрос?

Патрикия · Answer 1

Program z1;

var p, s, a, b:integer;

begin

a:=84;

b:=152;

p: = (a+b) * 2;

s:=a*b;

writeln ('p=', p) ;

writeln ('s=', s) ;

end.