мета-данные страницы
  •  
Загрузка не удалась. Возможно, проблемы с правами доступа?

Различия

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

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

Предыдущая версия справа и слеваПредыдущая версия
Следующая версия		Предыдущая версия
Последняя версияСледующая версия справа и слева
pascal:clauses [24/10/2009 13:24] – ocapascal:clauses [06/10/2010 11:21] – oca
Строка 1: Строка 1:
 ===== Ветвление в программе ===== ===== Ветвление в программе =====
 FIXME FIXME
 +
 +Оператор //if// (или условный оператор) в **краткой форме** служит, чтобы выполнить какие-то действия, если выполняется некоторое условие.
  
 <code pascal| Простой условный оператор - проверка условия> <code pascal| Простой условный оператор - проверка условия>
Строка 6: Строка 8:
   x,y,z:integer;   x,y,z:integer;
 begin begin
-  if x = 0 then+  if x <> 0 then
   begin   begin
-    writeln(y);+    writeln(y / x);
   end;   end;
      
 end. end.
 </code> </code>
 +
 +**Полный** оператор //if// служит для разделения ход выполнения программы на две ветви в соответствии с некоторым условием, 
 +
 <code pascal| Полный условный оператор - разветвление программы> <code pascal| Полный условный оператор - разветвление программы>
 var  var 
Строка 19: Строка 24:
   if x < 0 then   if x < 0 then
   begin   begin
-    writeln('Ветка с отрицательным значением X');+    ...  // Ветка с отрицательным значением X;
   end   end
   else   else
   begin   begin
-    writeln('Ветка с положительным или нулевым значением X');+    ... // Ветка с положительным или нулевым(!!!) значением X;
   end;   end;
 end. end.
Строка 43: Строка 48:
 </code> </code>
  
-Во в большинстве версий языка Pascal, включая Free Pascal, допускается чтобы метки были неупорядочены,  не допускается неоднозначность: +В большинстве версий языка Pascal, включая Free Pascal, допускается чтобы метки были неупорядочены, но не допускается неоднозначность: 
  
 <code pascal| Перебор вариантов> <code pascal| Перебор вариантов>