Задача 2 Урок 12.2
Primary tabs
1 Напишите программу, которая выводит на экран ряд чисел с помощью цикла for:
1 5 9 13 17 21 25 29 33 37 41 45
var a:integer; begin for a:=1 to 45 do if ((a mod 4)=1) then write(a,' '); readln(); end. </pre> Вывод консоли: 1 5 9 13 17 21 25 29 33 37 41 45
- Log in to post comments
- 47 reads