Question

Паскаль
Даны 40 квадратов. Найти их площади, если стороны вводятся в компьютер.
Как решать?

Answer 1

Очень даже легко.
Ну вот программка на PascalABC:
program kv;
var
a,s,i:integer;
begin
readln (a);
for i:=1 to 40 do
begin
s:=sqr(a);
writeln (s);
readln (a);
end;
end.