мета-данные страницы
Загрузка не удалась. Возможно, проблемы с правами доступа?
Различия
Показаны различия между двумя версиями страницы.
Предыдущая версия справа и слеваПредыдущая версия | Последняя версияСледующая версия справа и слева | ||
pascal:iterations [20/10/2010 14:22] – oca | pascal:iterations [20/10/2010 14:24] – oca | ||
---|---|---|---|
Строка 79: | Строка 79: | ||
<code pascal| Цикл While-Do> | <code pascal| Цикл While-Do> | ||
writeln(' | writeln(' | ||
- | While (i <= 10) Do | + | While (i >= 10) Do |
{ Потеряны Begin и End? } | { Потеряны Begin и End? } | ||
writeln(i); | writeln(i); | ||
{ Судя по коду, значение i - неопределено } | { Судя по коду, значение i - неопределено } | ||
- | i:=i+1; | + | i:=i-1; |
- | { Эта команда никогда не выполнится } | + | { Эта команда |
</ | </ | ||
Строка 91: | Строка 91: | ||
<code pascal| Цикл While-Do> | <code pascal| Цикл While-Do> | ||
writeln(' | writeln(' | ||
- | i:=1; | + | i:=100; |
{ Инициализация } | { Инициализация } | ||
- | While (i <= 10) Do | + | While (i >= 10) Do |
Begin | Begin | ||
writeln(i); | writeln(i); | ||
- | i:=i+1; | + | i:=i-1; |
{ Шаг цикла } | { Шаг цикла } | ||
End; | End; |