Вывести на экран все кратный 17 числа от 1 до 100, используя 3 варианта цикла и одну переменную i . ( в паскале)

262

335

Посмотреть ответы 2

Ответы на вопрос:

Андре127

Информатика

4,5(57 оценок)

Var i: integer; begin writeln('цикл for: '); for i: =1 to 100 do if i mod 17 = 0 then write(i: 3); writeln(); writeln('цикл while: '); i: =1; while i< =100 do begin if i mod 17 = 0 then write(i: 3); i: =i+1; end; i: =1; writeln(); writeln('цикл repeat: '); repeat begin if i mod 17 = 0 then write(i: 3); i: =i+1; end; until i> =100; end.