Question

Написать программу на языке Паскаль. Найти площадь квадрата, если с клавиатуры вводится его сторона.

Answer 1

uses WinCrt;
var
a, s: real;
begin
write('Введите сторону квадрата: ');
readln(a);
s:=a*a;
writeln('Площадь квадрата: ',s:5:2);
end.