Презентация на тему: Работа с файлами

Чтобы переваривать знания, Нужно поглощать их с аппетитом. А. Франс

конец

Название программы program Kurator; Раздел описания uses crt; const n=5; var x,y:text; i,b,k,d:integer; a,p:string; f:array [1..n] of string; g:array [1..n] of integer; Объявление начала программы begin clrscr; Объявление и открытие файлов с данными assign(x,'C:\1.txt'); assign(y,'C:\2.txt'); reset(x); reset(y);

Чтение данных из файлов Вывод их на экран Запись данных в массивы for i:=1 to n do begin writeln; write(i,' студент - '); readln(x,a); write(a); f[i]:=a; writeln; write('оценка - ':11); read(y,b); write(b); g[i]:=b; writeln; end; writeln;

Сортировка элементов двух массивов for k:=1 to n do for i:=1 to n do if g[i]

Задания для самостоятельной работы № Работа с 2 файлами № Работа с 1 файлом 1 Сортировка по возрасту 6 Количество 16-летних 2 Сортировка по годам 7 Количество 17-летних 3 Сортировка по полу 8 Количество отличников 4 Список отличников 9 Количество бюджетников 5 Список ударников 10 Количество девочек

При работе с различными типами входных данных записывать их в файл нужно с новой строки для программы Pascal ABC.

В задаче о сортировке по полу мальчиков можно отметить символом m (man), а девочек символом w (woman)

for i:=1 to n do begin writeln; readln(x,a,b); write(a,b); end; for i:=1 to n do begin writeln; readln(x,a); write(a); readln(x,b); write(b); end;