Question

Есть сторона квадрата a=8.50 как найти периметр программа pascal ABC

Answer 1

var 
a,P:real;
begin
writeln('Введите сторону квадрата');
readln(a);
P:=a*a*a*a;
writeln('Периметр квадрата равен',P);
end.

Answer 2

Не совсем так как я решил пока не было ответов, но правильно

Answer 3

а как ты решил?

Answer 4

а+а+а+а пиши, я чего-то перепутал)