Напишите программу вычисляющую площадь квадрата. Стороны пользователь вводит с клавиатуры
Можно сделатьтаблицу в Excel, или я незнаю
var
a:integer;
s:longint;
begin
repeat
write ('A = ' );readln(a);
until (a>0);
s:=sqr(a);
writeln (s);
readln;
end.