Сидоров Василий Васильевич 5 5 4 4.7
Юрьев Алексей Юрьевич 4 5 5 4 4.5
получается надо создать файл и разместить всё это в нём.Это делается так?
begin
...
....
head2:=nil;
assign(n,'sot2.txt');
rewrite(n)
while p<>nil do begin
write(n,{???});
p:=p^.next;
end{while}
close(n);
end.
Добавлено через 11 мин.
и всё-таки я думаю,что я как всегда намудрил в программе. вот программа:
1_1.PAS ( 3.77 килобайт ) Кол-во скачиваний: 411
Вот то,на чём тестил:
SOT.TXT ( 162 байт ) Кол-во скачиваний: 404
заранее благодарен за помощь!