Составить программы для цикла for А) Вывести число от 1 до 100, кратное 10 Б) Вывести число от 1 до 50, кратное 7

Question

Мирослав

20 января, 21:32

+4

Ответы (1)

Знаете ответ на вопрос?

Петюша · Answer 1

А)

for j : = 1 to 100 do

if i mod 10 = 0 then writeln (i) ;

Б)

for j : = 1 to 50 do

if i mod 7 = 0 then writeln (i) ;