Вывести все натуральные числа и записать числа которые делятся на 17 без остатка - Turbo Pascal
Формулировка задачи:
Задание, вывести все натуральные числа и записать числа которые делятся на 17 без остатка, как сделать?
Решение задачи: «Вывести все натуральные числа и записать числа которые делятся на 17 без остатка»
textual
Листинг программы
- const n =1000000;
- var i:longint;
- BEGIN
- For i:=1 to n do
- IF i mod 17 = 0 THEN Writeln(i);
- END.
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д