Ответы
Ответ дал:
3
var
S,P, a,b:integer;
begin
read(a);
read (b);
begin
P:=(a+b)*2;
write('Периметр:',P); end;
begin
S:=a*b; write('Площадь:',S); end;
end.
Вас заинтересует
1 год назад
1 год назад
6 лет назад
8 лет назад