Вопрос по задаче №2 из главы 12.2. Переделать цикл while на for
Primary tabs
Вопрос по задаче №2 из главы 12.2
У вас есть программа, использующая цикл while:
var i: integer; begin i:=1; while i<=100 do begin write(i, ' '); i:=i+5; end; readln(); end.Объясните что делает эта программа (что будет выведно на экран и почему)
Перепешите её с помощью цикла repeat/until
Перепешите её с помощью цикла for
Как получить результат через for, которые были получены через циклы repeat-until и while:
1 6 11 16 21 26 31 36 41 46 51 56 61 66 71 76 81 86 91 96
Я заметил что числа заканчиваются на 1 и 6
но никак не могу сообразить как задать условие для for
Думаю задать через if и mod, div
Но как это сделать?
- Log in to post comments
- 32418 reads
gani84
Mon, 06/22/2020 - 12:08
Permalink
Ответ
Результат выводиться 1 6 11 16 21 26 31 36 41 46 51 56 61 66 71 76 81 86 91 96. Без переменной 'a' программа работать не будет. Просьба засчитать
gani84
Mon, 06/22/2020 - 12:11
Permalink
Ответ
Результат выводиться 1 6 11 16 21 26 31 36 41 46 51 56 61 66 71 76 81 86 91 96 . Без переменной "a" код не будет работать. Просьба засчитать других вариантов нет.
gani84
Tue, 08/18/2020 - 12:26
Permalink
Решение