Соотнеси команды для выполнения задачи и их порядок.

program kvadrat;

var i, n: integer;

begin

 writeln ('Таблица квадратов');

 writeln ('');

 writeln (' Число  Квадрат');

 writeln ('');

 i:= 1;

 n:= 10;

 for i:=1 to n do

 begin

   writeln ('  ',i,'   ', sqr(i));

 end;

 writeln ('');

end.

Объяснение:

program xxx;

    var i, s : integer;

begin

  s: =0;

  for i: = 10 to 99 do

      if i mod 5 = 0 then s: =s+i;

  writeln('сумма двузначных чисел, кратных 5 =', s);

  readln

end.

20-25=-5