Запись из файла в двумерный массив

[m1croN]

Здравствуйте!
Имеется файл Input.txt, содержащий числа (в четырех строчках по два числа, разделенных пробелом). Как эти числа записать в двумерный массив? Вот то, что я накидал тут.. но паскаль ругается и выдает различные ошибки. Подскажите пожалуйста что я делаю не так. Заранее спасибо!

program z13b;
uses crt;
type mas=array [1..10000] of array[1..10000] of longint;
const n=4;
var i,a,b,j:integer;
y,u:mas;
f:file of integer;
c,d:mas;
begin
assign(f,'Input.txt');
reset(f);
for i:=1 to n do
begin
for j:=1 to 2 do 
begin
read(f,c[i,j]);
end;
end;
end.

[whatever]

type mas=array [1..4,1..2] of longint;
const n=4;
var i,a,b,j:integer;
y,u:mas;
f:file of integer;
c,d:mas;
begin
assign(f,'Input.txt');
reset(f);
for i:=1 to n do
  begin
    for j:=1 to 2 do
//      begin     //нафиг не надо
        read(f,c[i,j]);
//      end;
      readln(f)
  end;
end.

Кстати, зачем массив такой огромный? O_o

[m1croN]

Числа будут от 1 до 10 000
Ошибочка

[whatever]

Сообщение от m1croN

Числа будут от 1 до 10 000

Б**, только сейчас заметил...
Во-первых, что бы работало замени

mas=array [1..10000] of array[1..10000] of longint;

на

mas=array [1..10000,1..10000] of longint;

Во-вторых, Сам же написал

в четырех строчках по два числа, разделенных пробелом

А значит тебе хватит

mas=array [1..4,1..2] of longint;

update: Еще можно const перед type написать, а массив задать так:

mas=array [1..n,1..2] of longint;

Так будет правильнее и логичнее

[m1croN]

mas=array [1..10000,1..10000] of longint;
Пардоньте, но по-моему эти числа в скобках указывают на диапазон чисел, которые могут быть в массиве, или нет?
И даже так, как вы написали, не работает.

[ACE Valery]

To m1croN: Эти числа указывают размерность массива. Вам не мешало бы книжку почитать по Паскалю.

To whatever:

Во-первых, что бы работало замени

mas=array [1..10000] of array[1..10000] of longint;

на

mas=array [1..10000,1..10000] of longint;

Насколько я знаю, оба способа объявления двумерных массивов правильны.

[whatever]

mas=array [1..10000,1..10000] of longint;
Пардоньте, но по-моему эти числа в скобках указывают на диапазон чисел, которые могут быть в массиве, или нет?
И даже так, как вы написали, не работает.

Доучились, называется, до второго семестра, таких вещей не знать...
Прога простая до невозможности, но с легкой руки автора в ней просто невероятное количество подводных камней, про которые даже не подумаешь



ACE Valery, хм, согласен, мой косяк, динамические только так и задаются. Просто для статических массивов ну ОЧЕНЬ непривычная форма записаи.

[m1croN]

Спасибо. А если мне неизвестно количество строк, это количество прописано в первой строчке самого файла, а уже дальше идут n строчек по два числа, как мне тогда описать массив?

[m1croN]

whatever, спасибо. И я не студент, а ученик 11-го класса. Просто у нас в школе такие задачки не делают, а мне олимпиаду писать, вот и не все знаю, прошу прощения, если моя неграмотность вас раздражает

[whatever]

Сообщение от m1croN

Спасибо. А если мне неизвестно количество строк, это количество прописано в самом файле, как мне тогда описать массив?

Два варианта:
1. Объявляешь массив заведомо бОльшего размера (что, впринципе ты и делел):

mas=array [1..10000,1..2] of longint;//предполагается, что в файле не более 10000 строк

Но это плохой вариант.
2. Динамический массив, т.е. его размерность устанавлевается уже в теле программы.

В обоих случаях считывать через for нецелесообразно, рекомендую while с EOF и EOLN.
Update: ну да, если знания из школы, то понятно. Напиши пример того, что хранится в input.txt, я тебе програмку накидаю, которая будет работать независимо от количества строк.