Вывод на экран кубов чисел от 11 до 5 — Pascal(Паскаль)

Program Test2;
  var
      N: integer;
begin
  for N:=11 downto 5 do     { Счетчик N изменяется с шагом -1 }
    write(N*N*N:5);      { Эта строка - тело цикла; оно выполняется 8 раз, так как N изменяется от 11 до 5 с шагом -1 }
  writeln;     { Этот оператор нужен, чтобы закончить вывод чисел в одну строку }
  readln
end.

Leave a Comment

23 − 18 =