написать программу на turbo pascal вычисления площади прямоугольника, если известно, что сторона a=5, b=2,5
Ответ:
Program p1;
var a,b,P:real;
begin
a:=5;
b:=2.5;
P:=2*(a+b);
Write('Периметр=',P);
end.
Объяснение: