Часть1. Программирование в системе TurboPascal Структура программы на языке Pascal

Программа на языке Pascalсостоит из заголовка, раздела подключения модулей, раздела описаний и раздела операторов:

Programимя;

Uses< список модулей >;

раздел описаний

Begin

раздел операторов

End.

Заголовокпрограммы начинается с зарезервированного словаProgramи содержит имя программы, которое дает сам программист.

Подключение модулей начинается с зарезервированного словаUses и содержит список модулей (библиотек внешних процедур и функций).

Раздел описанийсостоит из подразделов, в которых объявляются все встречающиеся в программе объекты: метки (Label), константы (Const), типы (Type), переменные (Var), внутренние процедуры (Procedure), внутренние функции (Function). Описания отделяются друг от друга точкой с запятой.

Раздел операторовзаключается в операторные скобкиBeginиEnd, при этом послеEndставитсяточка. Операторы отделяются друг от друга точкой с запятой.

Примеры программ на языке Pascal

Рассмотрим два примера программ соответственно двум вариантам схем алгоритма (рис. 1).

Пример 1. Программа вычисления площади круга (схема алгоритма Варианта1)

( значение радиуса задается оператором присваивания)

{ Вариант 1: Вычисление площади круга }

ProgramPRIM1; {заголовок программы}

UsesWinСrt; {подключение модуля управления экраном в текстовом режиме}

Const {подраздел объявления констант}

Pi=3.14; {задание константыPi}

Var {подраздел объявления переменных}

R,S:Real; {переменные вещественного типа – радиус и площадь круга}

Begin {начало раздела операторов}

Clrscr; {очистка экрана}

R:=1.5; {оператор присваивания переменнойRзначения 1.5}

S:=Pi*R*R; {оператор присваивания для вычисленияS}

Writeln(‘S=’,S:7:3); {вывод на экран значенияS}

End.{конец программы}

Пояснения к программе:

1. Программа начинается с комментария, который заключается в фигурные скобки. Комментарии могут располагаться как вне, так и внутри программы. В комментариях разрешается указывать все символы клавиатуры.

2. После комментария идет заголовок программы, содержащий ее имя PRIM1.

3. В разделе Usesуказывается подключаемый к программемодуль WinCrt, содержащий средства работы с экраном (например, очистка экрана процедуройClrScr).

4. В разделе описаний - два подраздела:

   1. подраздел констант (Const), где определена константаPi;

   2. подраздел переменных (Var), где объявляются все переменные, используемые в разделе операторов и резервируются ячейки оперативной памяти; в нашем случае это переменные действительного типа –RиS.

5. Раздел операторов заключается в операторные скобки (Begin и End.) и содержит:

   1. вызов процедуры ClrScrдля очистки экрана во время выполнения программы;

   2. два оператора присваивания:

- задание переменной Rзначения 1.5;

- вычисление площади круга S(операция присваивания имеет вид “:=”);

3. оператор вывода значения переменной Sна экран:Writeln(‘S=’,S:7:3)

Пояснения к оператору вывода:

а) для оператора вывода есть два ключевых слова WriteилиWriteln

б) оператор Writeln(параметры)означает вывод параметров и последующий переход на новую строку (параметры записываются через запятую);

б) оператор Write(параметры)означает вывод параметров без перехода на новую строку

в) оператор Writelnбез параметров означает переход на новую строку;

г) в списке параметровмогут быть строки символов и имена переменных:

• для вывода строки символов используются ограничивающие апострофы, например, ‘S=’ или ‘Результаты вычислений’

• при выводе значение действительной переменной может иметь два представления:

1-е - с фиксированной точкой: в этом случае указываетсяимя переменной, за которой через двоеточие стоятформаты (S:7:3), где первое число (7) обозначает общее поле выводимого значения, второе число (3) – поле дробной части.Общее полевключает:

- отрицательный знак числа или пробел для положительного числа,

- количество цифр в целой части,

- десятичную точку,

- количество цифр в дробной части.

Так в нашем случае вывод значения Sв соответствии с форматомS:7:3означает, что на изображение всего числа отведено 7 позиций, из них 3 позиции справа на дробную часть, 4-я позиция справа на десятичную точку, остальные - на целую часть. Результат будет иметь вид:S= 7.065

2-е – с плавающей точкой: в этом случае указывается толькоимя переменной без форматов, например,Write(‘S=’,S). Результат будет иметь вид:S= 7.0650000000Е+00

Пример 2. Программа вычисления площади круга (схема алгоритма Варианта2)

( ввод значения радиуса с клавиатуры)

{ Вариант 2: Вычисление площади круга }

ProgramPRIM2;

UsesWinСrt;

Const

Pi=3.14;

Var

R,S: Real;

Begin

Clrscr;

Write(‘Введите радиус ‘); {вывод на экран текста запроса}

Readln(R); {ввод с клавиатуры значенияR}

S:=Pi*R*R;

Writeln(‘S=’,S:7:3);

End.

Пояснения к программе:

1. Эта программа отличается от предыдущей только тем, что значение радиуса вводится с клавиатуры, а не присваивается в операторе присваивания. Операторы WriteиReadlnиспользуются для организации диалога пользователя с компьютером:

- оператор Write(‘ Введите радиус ‘)выводит на экран текст:Введите радиус

- оператор Readln(R)служит для ввода с клавиатуры численного значения переменнойRво время выполнения программы.

2. Все остальные части программы работают так же, как и в предыдущей программе.