Различия

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

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

Предыдущая версия справа и слева Предыдущая версия
pascal:basics [04/07/2015 11:42]
Олег Альбертович Скворцов
pascal:basics [04/07/2015 12:13] (текущий)
Олег Альбертович Скворцов
Строка 69: Строка 69:
   i, j : integer; ​       // 1-е описание переменных   i, j : integer; ​       // 1-е описание переменных
   r, q : real;           // 2-е описание переменных   r, q : real;           // 2-е описание переменных
-  k, m : integer; ​       // 3-е описание переменных - снова integer. Имеем право.+  k, m : integer; ​       // 3-е описание переменных - снова integer. ​ 
 +                         // ​Имеем право.
  
 Begin Begin
Строка 76: Строка 77:
   ...   ...
 End.                  // Конец всему (в этой программе)! End.                  // Конец всему (в этой программе)!
 +
 </​code>​ </​code>​
  
Строка 183: Строка 185:
 <code pascal|Пример 1> <code pascal|Пример 1>
 Begin Begin
-                    ​// Если убрать этот комментарий,​ то получится  +   // Если убрать этот комментарий,​ то получится  
-                    // минимальная правильная программа на Паскале+   ​// минимальная правильная программа на Паскале 
 +   // Впрочем,​ для Паскаля его и нет.
 End. End.
 </​code>​ </​code>​
  
-Данная программа работает (стирает с экрана следы работы предыдущих программ),​ но не содержит ни одного описания.+Данная программа ​действительно ​работает (стирает с экрана следы работы предыдущих программ),​ но не содержит ни одного описания. Её реальный аналог есть, например,​ в операционной системе ДОС.
  
 <code pascal|Пример 2> <code pascal|Пример 2>
Строка 209: Строка 212:
 Const               // Раздел констант ​ Const               // Раздел констант ​
   n = 5;            // В данном случае n - не переменная,​ а другое обозначение 5.   n = 5;            // В данном случае n - не переменная,​ а другое обозначение 5.
-  m : integer = 6;  // Один из ужасов Паскаля. Это - статическая переменная! Без понимания,​ что к чему, лучше не использовать.+  m : integer = 6;  // Один из ужасов Паскаля. Это - статическая переменная! ​ 
 +                    // Без понимания,​ что к чему, лучше не использовать
 +                    // но это - настоящая переменная
   ​   ​
 Var                 // Раздел переменных Var                 // Раздел переменных
   i:​integer; ​       // Запасная переменная - нам не потребуется   i:​integer; ​       // Запасная переменная - нам не потребуется
   ​   ​
-Label               // Раздел меток. У меток описывать нечего,​ но они должны быть перечислены. +Label               // Раздел меток. ​ 
-  ​BeeginProgram, ​ EndProgram +  BeeginProgram, ​   // У меток описывать нечего,​ но они должны ​ 
 +  EndProgram; ​      // ​быть перечислены. 
 +  ​ 
 +Type 
 +  S100 =  string[100]
  
 Procedure Proc(x:​integer);​ Procedure Proc(x:​integer);​
 +// Данная процедура принимает параметр x
 +// после чего всегда печатает:  ​
 +// "​Опять - 25. Не мешайте работать!"​
  
 +Const 
 +  S2 = '. Не мешайте работать!';​ 
 +Var   
 +  S1 : S100; 
 +  ​
 Begin: Begin:
-  ​writeln('​Не мешайте работать!')+  ​x  := n;           // Для данной процедуры значения параметров не важны  
 +  S1 := '​Опять '
 +  writeln(S1, x, S2 );
 End; End;
  
-Begin +Begin                 
-BeginProgram:​  +BeginProgram: ​       // Метка ничего не делает,​ но место указывает 
-  goto EndProgram; ​  // Хватит работать пошли домой +  ;                  // Отсюда собираемся работать 
-  Proc(n);  +  goto EndProgram; ​  // Хватит ​УЖЕ ​работатьпошли домой 
-EndProgram: ​          +  Proc(n); ​          // Здесь мы к счастью никогда не побываем,​ 
-  ;   +  goto BeginProgram;​ // иначе - никогда не выберемся ​ 
-End.+EndProgram: ​         ​// Место у выхода 
 +  ;                  // Перекур после честной работы ​ 
 +End.                 // Теперь - совсем всё ​
 </​code>​ </​code>​
  
CC Attribution-Noncommercial 4.0 International
Driven by DokuWiki Recent changes RSS feed Valid CSS Valid XHTML 1.0