Существует описание TPerson = Object Name : string[25]; Stavka : Real; Procedure Init (Nm, Dg : String; Sv : Real); Procedure ShowName; Procedure ShowStavka; end; TStudent = Object (TPerson) Ball : Real; Procedure Init (Nm, Dg : String; Sv, Bl : Real); Procedure ShowBall; end; Var a : TStudent; b : Tperson; Процедура ShowName выводит содержимое поля Name. Для того, чтобы вывести значение поля Name переменной а, необходимо написать оператор
(*ответ*) а . ShowName
Write (Name)
ShowName
b . ShowName
Существует описание TPerson = Object Name : string[25]; Stavka : Real; Procedure Init (Nm, Dg : String; Sv : Real); Procedure ShowName; Procedure ShowStavka; end; Var p : ^TРerson; Правильно записанное обращение к процедуре Init имеет вид
(*ответ*) p^ . Init (‘Захаров’, ‘Бухгалтер’, 400)
TPerson . Init (‘Захаров’, ‘Бухгалтер’, 400)
Init (‘Захаров’, ‘Бухгалтер’, 400)
p . Init (‘Захаров’, ‘Бухгалтер’, 400)
Существующий типизированный файл можно открыть для чтения и записи одновременно с помощью стандартной процедуры
(*ответ*) Reset (f)
Close (f)
Append (f)
Rewrite (f)
Указатель последнего элемента списка содержит
(*ответ*) значение Nil
адрес этого элемента
адрес первого элемента списка
значение 0
Усекает файл f по текущему положению указателя функция
(*ответ*) Truncate
Filesize
Seek
FilePos
Файлами последовательного доступа являются файлы
(*ответ*) текстовые
нетипизированные и типизированные
текстовые и типизированные
нетипизированные и текстовые
Файлами прямого доступа являются файлы
(*ответ*) нетипизированные и типизированные
текстовые
текстовые и типизированные
нетипизированные и текстовые
Файлы, компонентами которых являются строки неопределенной длины, называются
(*ответ*) текстовыми
файлами прямого доступа
типизированными
нетипизированными
Файлы, представляющие собой неструктурированный поток байтов, называются
(*ответ*) нетипизированными
последовательными
типизированными
текстовыми
Файлы, состоящие из записей постоянной длины, называются
(*ответ*) типизированными
последовательными
нетипизированными
текстовыми
Функции процедуры Close при нормальном завершении программы
(*ответ*) выполняются автоматически
не выполняются только для файлов прямого доступа
выполняются только для файлов, открытых для чтения
не выполняются
Функция Eof ( f ) предназначена для определения
(*ответ*) конца файла
количества компонентов файла
номера компоненты файла
существования файла на диске