Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
1-80.doc
Скачиваний:
11
Добавлен:
25.09.2019
Размер:
1.53 Mб
Скачать

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 по 40.

  1. Модуль сrt. Управление экраном в текстовом режиме

Модель CRT служит для управления экраном текстовым движением, а также для управления клавиатуры и звуковыми сигналами. Он содержит библиотеку процедур, выполняемых при их вызовах. Подключается в начале раздела описания основных программ оператором uses crt. (процедуры и функции по управлению экраном – табл.1)

Поскольку таблица большая, я предоставлю небольшой фрагмент, на мой взгляд, который еще можно будет запомнить:

TextBackGround(N);

N - тип Byte, 0 <=N<= 7

Назначение цвета фона. При N>7 N:= N mod 8

Clrscr;

Использование процедуры после TextBackGround(N); закрашивает активное окно

Очистка активного окна, экрана курсор устанавливается в позицию (1, 1). Закрашивание окна.

TextColor(N);

N - тип Byte 0 <=N<= 15 а также при N:= N + 128 вывод мерцающих символов -

Назначение цвета символов. При N>15, N:= N mod 16,

GotoXY(x, y);

x, y - тип Byte

Установка курсора в позицию ( x, y ) в системе координат активного окна, экрана.

InsLine;

Вставка пустой строки.

DelLine;

Удаление строки в позиции курсора.

ClrEol;

Стирание символов от позиции курсора до конца строки.