1. 5.
Структура программы
Структура программы на языке Турбо-Паскаль
имеет вид:
Program NAME;
{
Заголовок программы - не обязательный оператор }
{
NAME - имя программы }
{
Раздел описания }
{$N+}
{ Режим
компиляции для расчетов с подключением
сопроцессора }
Uses
CRT, DOS,
GRAPH;
{
Подключение библиотек CRT, DOS, GRAPH }
Label
L1, L2, L3;
{ Список используемых в
программе меток L1, L2, L3 }
Const C=10;
{ Задание значений констант,
используемых в программе }
B=0. 15; Y=True;
{ С-
целое число, В-
вещественное число }
F='Фамилия';
{
Y- Логическая константа, F-
Символьная строка }
Type M=
array[1. . 100]
of integer;
{Описание
типов введенных программистом }
Var
{
Описание переменных }
m1, m2:
M;
{ m1, m2 -
массивы целых чисел (типа М) }
a1:
array [ 1. . 100 ] of real;
{ а1 -
массив вещественных чисел }
ch: array [ 1. . 200 ] of
char; {
ch - массив
символов }
ch1,
ch2: char;
{ ch1, ch2 - символьные переменные }
s:
string[79];
{
s - строка до 79 символов }
a, d, x:
real; {
a, d, x - вещественные переменные }
yes, no:
boolean;
{
yes, no - переменные логического типа
}
f1, f2:
text;
{
переменные для описания текстовых файлов }
{
---------------------------------------------------------------- }
Procedure NAME_1(Parm1:Real; Var Parm2:Real);
{
Заголовок процедуры }
{
NME_1 - имя
процедуры, Parm1,
Parm2 - параметры }
{ Раздел
описания }
BEGIN
{ Раздел выполнения }
END;
{
---------------------------------------------------------------- }
Function FUN_1(Parm3,
Parm4: Real): Real;
{
Заголовок функции }
{ FUN_1 - имя
функции, Parm3,
Parm4 - параметры }
{
Раздел описания }
BEGIN
{ Раздел выполнения }
END;
{ ----------------------------------------------------------------
}
{ $I File_1.
pas } {
Подключение файла File_1. pas с дополнительными
функциями
и процедурами }
{ ----------------------------------------------------------------
}
BEGIN
{
Начало выполнения программы }
{ Раздел выполнения }
