Опишите процедуру, которая вычисляет периметр прямоугольника - Pascal
Формулировка задачи:
Опишите процедуру, которая вычисляет периметр прямоугольника.
Решение задачи: «Опишите процедуру, которая вычисляет периметр прямоугольника»
textual
Листинг программы
procedure prm(a,b:real;var p:real);
begin
p:=2*a+2*b;
writeln('Периметр=',p:0:2);
end;