Program prog1;

[email protected] в категроии Информатика, вопрос открыт 24.07.2018 в 09:31

uses crt;
type god=record
year:1990..2018;
end;
var f : text;
year:god;
begin
assign(f,'C:\pas\Perepis.txt');
append (f);
writeln(f,'Петров Глеб 1999');
writeln(f,'Сидорова Мария 2003');
close(f);
reset(f);
repeat
readln(f,year);
writeln(year);

until Eof(f);
close(f);
end.
ЧТО НЕВЕРНО? ПОМОГИТЕ! ПИШЕТ :нельзя вводить данные этого типа