Работа с текстовым файлом, ПОВЕШУСЬ!!! Опции

[Олежик]

Ребят..
выручите плиз....
Меня из инста вышвырнут, если я её не сделаю.
Заранее спасибо!
Вот задача...
...
...
...
...
составить алгоритм и прогу определения по данным из таблицы банка, купившего акции на наибольшую сумму!!!
Таблица нах. в текст. файле list.txt ! Каждая строка таблицы содержит 4 поля. Первое - поле символьного типа, содержит название банка. Длина поля - 15 символов! Второе поле - символьного типа, содержит название компании, акции которого куплены банком. Длина поля - 20 символов. Третье поле - числового типа, содержит кол-во акций, купленных банком. Четвёртое поле - -числового типа, содержит стоимость одной акции в рублях.
Длина каждого из этих полей - 5 символов!!!!
...
...
Язык PASCAL!!!
=)

ПЛИЗ!!!

[klem4]

Что конкретно вызывает затруднение ?

[Олежик]

1.Текстовый файл создан....
2.не могу написать процедуру.
И немногго запутался с основной частью программы..
просто у нас такой учитель, который примеры не даёт..

[Lapp]

И немногго запутался с основной частью программы..

Приведи тут то, что есть. Распутаем

[Олежик]

Program...
var







Begin
 clrscr;
  writeln('Прога.....');
  Assign(fl,’list.txt’);
   {$I-}  {выключить стандартную реакцию 
                     на ошибку ввода/вывода}
   reset(fl);
   {$I+}  {включить стандартную реакцию 
                     на ошибку ввода/вывода}
   if (IOResult<>0) then 
      writeln(’Ошибка открытия файла. Конец работы.’)
   else begin
   /////////////////

далее у меня текст выводится херово...
процедура тоже

М

1. Теги не забываем... 2. Не надо так эмоционально... мисс_граффити

[hiv]

далее у меня текст выводится херово...
процедура тоже

Текст с русскими символами? Если да, то в какой кодировке? win(cp1251) или dos(cp866)
Короче - если текст нормально читается в блокноте (notepad), то надо менять его кодировку с win на dos.