Co mozna byłoby zedytować w tym aby było zgodne z tym menu?
Program plik_zdefiniowany;
Uses crt;
type osoba = record
imie:string[20];
nazwisko:string[25];
rok_urodzenia,id:integer;
end;
var
pracownik,wyjscie:osoba;
plik: file of osoba;
odp:char;
numer,i,wybor:integer;
BEGIN...