Вывести на экран последовательность чисел (в последовательности отсутствуют числа 3 и 8) - Pascal ABC
Формулировка задачи:
Задача:
Выводит на экран последовательность чисел (в
последовательности отсутствуют числа 3 и 8):
10 9 7 6 5 4 2 1
Решение задачи: «Вывести на экран последовательность чисел (в последовательности отсутствуют числа 3 и 8)»
textual
Листинг программы
var i:integer; BEGIN For i:=10 downto 1 do IF (i<>3) and (i<>8) THEN Write (i, ' '); END.