32.Двумерные массивы.
Var A:array[1..30,1..7] of byte;
33.Текстовые файлы.
Var f: Text;
Assign(f, 'Name_f');
где Name_f - имя файла.
Например,
Assign(f, 'file. dat'); {файл находится в текущем каталоге}
Assign(f,'C:\Pascal\Work\file.dat') {файл находится}
Открытие файла для записи данных
ReWrite(f);
Запись данных в файл
Write(f,"сп"); или Writeln(f,"сп"); {"сп" - список переменных}
Открытие файла для считывания данных
Reset(f);
Считывание данных
Read(f, "сп"); или Readln(f, "сп");
Закрытие файла
Close(f);
Запись данных в конец закрытого файла
Append(f);
34.Установка атрибутов файла.
Исходный атрибут файла
GetFattr(f, af);
Установка атрибута файла
SetFattr(f, af);
где f - имя файловой переменной,
af - имя переменной атрибута (тип Word).
|
Наименование |
Константа "ads" |
Двоичное |
Шестнадцатиричное |
|
Только для чтения |
ReadOnly |
0000 0001 |
$01 |
|
Скрытый файл |
Hidden |
0000 0010 |
$02 |
|
Системный файл |
System |
0000 0100 |
$04 |
|
Архивный файл |
Archiv |
0010 0000 |
$20 |
35.Описание функций и процедур.
Модули System, Crt, Graph
Procedure Name_P(p1, p2,...:"тип"; Var p3, p4,...: "тип";...);
Function Name_F("список формальных параметров"):"тип результата";
где Function и Procedure - служебные слова,
Name_F, Name_P - имена функции и процедуры соответственно,
p1, p2 - имена формальных параметров-значений,
p3, p4 - имена формальных параметров-переменных,
Type M= array[1..100]of real;
Procedure Name_P(p: M);
Name_P(p11, p22,..., p33, p44,...); - вызов процедуры Name_P,
Y:= Name_F("список фактических параметров"): - вызов функции Name_F,
Здесь p11, p22, . . . - имена или значения переменных,
p33, p44, . . . - имена переменных, значения которых возвращаются в программу.
Y - переменная, которой присваивается значение возвращаемое функцией.
36.Рекурсивные функции и процедуры.
Схема линейного взаимодействия процедур
Схема циклического взаимодействия процедур
1