gazon

Объясните, если можно на примере, как считывать из файла, в котором хранятся записи считывать нужную мне информацию. Буду благодарен

Vladimir_S

Объявить переменную типа "запись" и считывать последовательно, пока не дойдёте до нужной.

gazon

ААА, можно поподробней, или на примере?

gazon

Вот фрагмент программы, почему-то выводит 0.00
assign(f,'d:\sem.txt');
reset(f);
n:=1;
while not eof(f) do
begin
read(f,z);
a[n]:=z;
n:=n+1;
end;
close(f);
b:=0;
for i:=1 to n do
b:=b+a[i].rost;
sr:=b/n;
writeln('Ñðåäíèé ðîñò ó÷åíèêîâ',' ',sr:2:2);

gazon

здесь нужно средний рост учеников посчитать

Vladimir_S

Пожалуйста, выложите программу полностью. Я хочу увидеть прежде всего разделы типов и описания переменных. И желательно текстовые вставки давать латиницей (по-английски или транслитом), а то тут явные проблемы с кодировкой.