файлы в паскале

[Dmitrij]

Описать функцию getInt(Name,k) целого типа, возвращающую k-й элемент файла целых чисел с именем Name (элементы нумеруются от 0). Если файл не существует или не содержит k-го элемента, то функция возвращает 0. С помощью этой функции вывести пять элементов данного файла с указанными номерами.
Подскажите пожалуйста как организовать именно проверку на то, есть ли файл с введённым именем или нет? остальное сделать довольно просто, а с этим что то не могу разобраться СПАСИБО!

[antoha.by]

Все просто.
Тут нужно просто знать функцию IOResult;

function getInt(Name:string;k:integer):integer;
var f:text;
begin
 assign(f,name);
 {$I-}
 reset(f);
 if IOresult<>0 then
  begin
  getInt:=0;
  Ну и здесь вписать процедуру выхода из функции, помойму exit;
 end;
 {$I+}
close (f);
end;

Это проверка существования файла.

[Dmitrij]

Спасибо те (= ща попробую все организовать