Как заполнить типизированный файл записями
Типа так
var F:file of integerl;
i:longint;
Begin
assign (f,'Name.txt');
rewrite(f);
for i:=1 to 100 do write(f,i);
Close (f);
End.
В файл выведется integer-ы от 1 до 100
Нужно записать и прочитать запись
a=record
b,c:string;
d:real;
end;
Нужно записать и прочитать запись
a=record
b,c:string;
d:integer;
end;
Сразу не мог что-ли написать задание; до кучи ишшо ни здрасте ни досвиданья.
В интегрированной оболочке BP, e.g. IDE по нажатию клавиш Shift+F1 or simple - F1. Вызывается справка, в которой все это дело очень неплохо расписано.
По-моему mvg написал все более чем доступно.
Тем более разве сложно изменить всего одну строчку, а точнее:
var F:file of integer; -> var F:File of a;
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста,
нажмите сюда.