Question

В электронную таблицу занесли данные о тестировании учеников. Ниже приведены первые пять строк таблицы: A B C D 1 округ фамилия предмет балл 2 C Ученик 1 обществознание 246 3 В Ученик 2 немецкий язык 530 4 Ю Ученик 3 русский язык 576 5 СВ Ученик 4 обществознание 304 В столбце А записан округ, в котором учится ученик; в столбце В — фамилия; в столбце С — любимый предмет; в столбце D — тестовый балл. Всего в электронную таблицу были занесены данные по 1000 ученикам. Выполните задание. Откройте файл с данной электронной таблицей (расположение файла Вам сообщат организаторы экзамена). На основании данных, содержащихся в этой таблице, ответьте на два вопроса. 1. Сколько учеников в Северо-Восточном округе (СВ) выбрали в качестве любимого предмета математику? Ответ на этот вопрос запишите в ячейку Н2 таблицы. 2. Каков средний тестовый балл у учеников Южного округа (Ю)? Ответ на этот вопрос запиши те в ячейку Н3 таблицы с точностью не менее двух знаков после запятой.

Answer 1

Пусть есть строчный массив
for i:=1 to n do for k:=1 to length(a) do begin if a[i,k]=' ' then begin u:=u+1;if u=2 then j:=k;if u=3 then y:=k;if u=4 then l:=k;end;if copy(s,j+1,9)='подгорный' then begin if a[i,y+3]=' ' then p:=copy(s,y+1,2) else p:=copy(s,y+1,3);if a[i,l+3]>lingth(a) then t:=copy(s,l+1,3) else t:=copy(s,l+1,2);end;c:=val(p,h,cod);b:=val(p,h,cod);q:=c+b;if e=1 then e:=q;if e>q then e:=q;end;
for i;=1 to n do for i:=1 to k do write(a);
write(' ');
write(' ');
write(e);
наверное так, но я не знаю как файлы открывать