Question

Вычислите площадь квадрата, стороны квадрата вводятся с клавиатуры.​

Answer 1

var a: real;

begin

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

readln(a);

write('площадь квадрата: ',a*a);

end.