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

Различия

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

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

Предыдущая версия справа и слеваПредыдущая версия
Следующая версия		Предыдущая версия
pascal:algoritms [03/10/2010 20:02] – dnaumovpascal:algoritms [04/10/2010 02:19] (текущий) – dnaumov
Строка 1: Строка 1:
 ====== Обозначение и код ====== ====== Обозначение и код ======
  
-^   Значение  ^  Диаграмма  ^  Стиль кодирования  ^   Пример программы  ^ +^   Значение  ^  Диаграмма  ^   Пример программы  ^ 
-|**Начало программы**  |    {{  :pascal:begin.png  |Начало}}          |<code pascal>Program {Имя программы} ; +|**Начало программы**  |    {{  :pascal:begin.png  |Начало}}          |<code pascal>Program Test1;
-uses {имена необходимых библиотек через запятую} ; +
-const +
-   {описание необходимых констант} ; +
-var +
-   {описание необходимых переменных} ; +
-BEGIN    +
-{...} +
-</code>                      |<code pascal>Program Test1;+
 uses Crt; uses Crt;
 const const
-   c = 10;+   c = 2;
 var var
-   a, b : integer;+   a, b, m, i  : integer; 
 +   m1, m2, m3 : integer;
 BEGIN    BEGIN   
 {...} {...}
 </code>                      | </code>                      |
 |**Ввод данных**   |  {{  :pascal:readln.png  |Ввод данных}}   |<code pascal>{...} |**Ввод данных**   |  {{  :pascal:readln.png  |Ввод данных}}   |<code pascal>{...}
-ReadLn({Имя одной переменной}); 
-ReadLn({Имя другой переменной}); 
-{...} 
-</code>                      |<code pascal>{...} 
 ReadLn(a); ReadLn(a);
 ReadLn(b); ReadLn(b);
 {...} {...}
 </code>                      | </code>                      |
-|**Ветвление**   |  {{  :pascal:if_1.png  |Ветвление}}   |<code pascal>{...} +|**Оператор**   |  {{  :pascal:op_1.png  |Оператор}}   |<code pascal>{...} 
-if {Условие} then {Оператор 1} else {Оператор 2};+m:=a;
 {...} {...}
-</code>                      |<code pascal>{...}+</code>                      | 
 +|**Операторы**   |  {{  :pascal:op_N.png  |Операторы}}   |<code pascal>{...} 
 +begin 
 +  m1:=a; 
 +  m2:=b; 
 +  m3:=a+b; 
 +end; 
 +{...} 
 +</code>                      | 
 +|**Ветвление**   |  {{  :pascal:if_1.png  |Ветвление}}   |<code pascal>{...}
 if a>b then m:=a else m:=b; if a>b then m:=a else m:=b;
 {...} {...}
 </code>                      | </code>                      |
 +| :::   |  {{  :pascal:if_2.png  |Ветвление}}   |<code pascal>{...}
 +if a>b then m:=a;
 +{...}
 +</code>                      |
 +|**Вывод данных**   |  {{  :pascal:writeln.png  |Вывод данных}}   |<code pascal>{...}
 +WriteLn(a);
 +WriteLn(b, '. ', a);
 +{...}
 +</code>                      |
 +| **Циклы**   |  {{  :pascal:for.png  |Цикл For}}   |<code pascal>{...}
 +for i:=1 to a do writeln(i, '. ', b);
 +{...}
 +</code>                      |
 +
 +
  
  
Строка 41: Строка 54:
  
  
-====== Примеры ======+====== Примеры алгоритмов======
  
 ===== Сумма двух чисел ===== ===== Сумма двух чисел =====