Различия

Здесь показаны различия между двумя версиями данной страницы.

Ссылка на это сравнение

Предыдущая версия справа и слева Предыдущая версия
pascal:iterations [20/10/2010 14:24]
Олег Альбертович Скворцов
pascal:iterations [20/10/2010 14:28] (текущий)
Олег Альбертович Скворцов
Строка 79: Строка 79:
 <code pascal| Цикл While-Do>​ <code pascal| Цикл While-Do>​
 writeln('​Печатаем числа от 1 до 10'); writeln('​Печатаем числа от 1 до 10');
-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;
-  { Эта команда ​или ​никогда не выполнится }+  { Эта команда ​может ​никогда не выполнится }
 </​code>  ​ </​code>  ​
  
Строка 91: Строка 91:
 <code pascal| Цикл While-Do>​ <code pascal| Цикл While-Do>​
 writeln('​Печатаем числа от 1 до 10'); writeln('​Печатаем числа от 1 до 10');
-i:=100; +i:=9;
  { Инициализация }  { Инициализация }
-While (i >= 10) Do +While (i >= 0) Do 
 Begin Begin
-  writeln(i);​ +  writeln(10-i);
   i:=i-1;    i:=i-1;
   { Шаг цикла }   { Шаг цикла }
CC Attribution-Noncommercial 4.0 International
Driven by DokuWiki Recent changes RSS feed Valid CSS Valid XHTML 1.0