Question

Составьте программу, вычисляющую периметр прямоугольника. Код программы сфотографировать и прислать​

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.

Объяснение:

Answer 2

# Формула P=2(a+b)

a = 3

b = 4

P=2*(a+b)

print(P)