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