Паскальда файлдар, тексттермен жұмыс

Question

Топ студенттерінің аты-жөні, жынысы, туған жылы туралы мәлімет бар.Студ файлын құр. Құрылған файлды пайдалана отырып студенттердің 1992жылдан кейін туған ер балдар тізімін ал.

Answer 1

program file_a;

const n=5;

type student=record

fam,ima:string[20];

group:string[10];

var:st:student;

f:file of student;

i,j:byte;

begin

assign (f,'dann.dat');

rewrite(f);

for i:=1 to n do begin

write(i,'studenttin familiasi:');

readln (st.fam);

write(i,'student ati:');

readln (st,ima);

write(i,'student toby:');

readln (st.group);

end;

close(f);

end.

бул тек жоба гана ишинде 1992 ж дейн шыгаратыны жок !

Answer 2

Аллах разы болсын! Мұғалім маған блокнотка жазып, 10 шақты адамды енгізіп солардын ішінен ер балдардың 1993,1994,1995 жылы туылған балдарды алып шығу керек. Тағы көмектесіп жіберінізші