Question

Дана программа на языке Паскаль. Заполни пропуски.

Вывод на экран квадратов чисел от 1 до 19.

var
: integer;
begin
for n:=1 to
do
writeln(sqr(
));
readln;
end.

Answer 1

Ответ:

var

n: integer;

begin

for n:=1 to 19

do

writeln(sqr(n ));

readln;

end.

Answer 2

var n: integer;

begin

 for n:=1 to 19 do

 writeln(sqr(n));

 readln;

end.