Question

Напишите код программы, которая будет вычислять периметр фигуры.
Program Perimeter;
Var
Begin
Writeln
Readln
End.
Помогите пожалуйста
​

Answer 1

Ответ:

program perimeter;

var a, b:real;

begin

write('введите сторону: ');

read(a);

b:=a*4;

write('периметр = ',b);

end.