Читайте также:
|
1) Создайте три файла с именами f1. pas, f2. pas, File_1. pas.
Запишите в первый файл структуру программы, приведенную ниже.
Скопируйте текст файла f1. pas в окно с файлом f2. pas. В файле f2. pas исключите разделы с процедурами и функциями.
В файл File_1. pas скопируйте разделы с процедурами и функциями из файла f1. pas. В файле f1. pas уберите подключение файла File_1. pas.
Откомпилируйте файлы f1. pas и f2. pas.
Структура программы
Структура программы на языке Турбо-Паскаль имеет вид:
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 { Начало выполнения программы }
{ Раздел выполнения }
END. { Конец выполнения программы }
Операции и стандартные функции
В Турбо-Паскале применяются следующие условные знаки и служебные слова для описания различных операций:
Приоритет Условный Выражение Название Тип переменных Тип результата
операции знак операции в выражении выполнения операции
ЛОГИЧЕСКИЕ ОПЕРАЦИИ
1 not not A логическое логический логический
"не" целый целый
2 and A and B логическое логический логический
"и" целый целый
3 or A or B логическое логический логический
"или" целый целый
3 хor A хor B логическое логический логический
исключающее целый целый
"или"
Дата добавления: 2015-09-10; просмотров: 76 | Поможем написать вашу работу | Нарушение авторских прав |