Напишите программу, которая вычисляет площадь и периметр прямоугольника по двум его сторонам.

Question

Информатика

Вениамин

16 февраля, 05:44

Напишите программу, которая вычисляет площадь и периметр прямоугольника по двум его сторонам.

+5

Ответы (1)

Знаете ответ?

Януарий · Answer 1

Program qq;

var a, b, s, p : integer;

begin

writeln ('Введите стороны прямоугольника') ;

read (a, b) ;

s:=a*b;

p:=2 * (a+b) ;

writeln ('Площадь прямоугольника равна ', s) ;

writeln ('Периметр прямоугольника равен ', p) ;

end.