Вывести на экран последовательность чисел - Pascal

Формулировка задачи:

Вывести на экран последовательность чисел от 0 до 100 И от 100 до 0

Решение задачи: «Вывести на экран последовательность чисел»

textual
                            Листинг программы 
                        

                            begin
  for I := 0 to 100 do
    Write(I, ' ');
  WriteLn;
  for I := 100 downto 0 do
    Write(I,' ');
  WriteLn;
end;
                        

Оцени полезность:

9 голосов , оценка 4 из 5

Похожие ответы