Составить алгоритм вычисления периметра квадрата, если
известна его сторона. в программе паскаль авс

Ответ:

pascal

Объяснение:

var a, p: real;

begin

 Write('Введите значение стороны квадрата a: '); ReadLn(a);

 p := 4 * a;

 WriteLn('Периметр квадрата равен ', p:4:2);

end.