Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Чтение информации из файла на Turbo Pascal

KME © (2002-12-24 23:02:00)
ТРЕБУЕТСЯ РЕАЛИЗОВАТЬ СЛЕДУЮЩУЮ ЗАДАЧУ НА TURBO PASCAL
Содержимое text.txt:

6
1 3
3 1
1 1
3 3
5 2
7 1
--------
Число 6 - это последующее число указаний. Требуется грамотно прочитать всю эту информацию из файла, и разбить ее по массивам.
То есть, если рассматривать вторую линию файла (после шестерки).
Например:
A1[1] := 1;
A2[1] := 3; и т.д.
Проблема заключается в том, что я не знаю как правильно читать данные из файла на Turbo Pascal. Ну просто очень нужно. Пожалуйста, помогите!

Добавил (2002-12-25 02:48:00) [1]
бы к Юрий Зотов © (24.12.02 23:24)
Даже этих трех различий может и не быть!

drin (2002-12-25 02:23:00) [2]
Могу выслать исходник своего модуля с функциями для чтения/записи в фаил одно/двух-мерных масивов.
В КПИ за него освободили от зачёта.

Юрий Зотов (2002-12-24 23:24:00) [3]
const
Nmax = 10;
var
i, N: integer;
A1, A2: array[1..Nmax] of integer;
F: Text;
begin
Assign(F, "MyData.txt");
Reset(F);
ReadLn(F, N);
for i := 1 to N do ReadLn(F, A1[i], A2[i]);
Close(F);
...

А вообще-то, это азы для детишек. Не знать просто стыдно. Тем более человеку, у которого хобби - " Профессиональное программирование на Borland Delphi, написание программ на заказ в кратчайшие сроки".

Только не надо говорить, что Delphi и Turbo Pascal - разные вещи. Этот код и на Delphi выглядит практически так же (отличия - в трех словах, причем очевидные).

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »