Тема: надо найти в этом массиве 3 наибольших и записать их в текстовый файл
Показать сообщение отдельно
  #42  
Старый 26.12.2010, 23:30
radiokarazinec@mail.ru radiokarazinec@mail.ru вне форума
Прохожий
  
Регистрация: 13.12.2010
Сообщения: 25
Репутация: 10
По умолчанию
Код:
for i := 1 to 4 do
  Writeln(DataFile,max[i]);
так?
Ответить с цитированием