ДЭЛФИ 2 задачи для зачета(поиск элементов в массиве)

[Archetype]

ЗАДАЧА 1(пытался решить но очень много ошибок. Из файла не может прочитать)
Даны 56 целых числа,среди которых есть два числа, равных между собой и не равных остальным. Все остальные числа не равны между собой. Числа записаны в текстовом файле с именем data.txt Считать заданые числа из файла в одномерный массив. Отыскать в массиве два равных между собой элемента. Номера этих элементов и их значения должны быть выведены на экран дисплея.

[Alex_FF]

program Project6;

{$APPTYPE CONSOLE}

uses
  SysUtils;

const
  Source = 'data.txt';
  Len = 56;

type
  TArray = Array[1..Len] of Integer;

procedure Find(const a: TArray; var Index1, Index2: Integer);
var
  I, J: Integer;
begin
  for I := 1 to Len do
    for J := 1 to Len do
      if (a[I] = a[J]) and (I <> J) then
      begin
        Index1 := I;
        Index2 := J;
        Exit;
      end;
end;

var
  a: TArray;
  I, Index1, Index2: Integer;
  F: Text;
begin
  Reset(F, Source);
  for I := 1 to Len do
    ReadLn(F, a[I]);
  Close(F);
  Find(a, Index1, Index2);
  WriteLn('First Number: ', a[Index1], '  Index: ', Index1);
  WriteLn('Second Number: ', a[Index2], '  Index: ', Index2);
  ReadLn;
  ReadLn;
end.

[Archetype]

Большое СПАСИБО! Но прошу прощения я просто пока на первом курсе) объясните что творит
program Project6;

{$APPTYPE CONSOLE}

по ней делфи выдает ошибку Declaration expected but PROGRAM found

[maladoy]

А ты куда вставил то код Alex-a?
В форму?

[Archetype]

нет после... Сейчас не поленюсь поэксперементировать)

[Archetype]

так что значат эти таинственные 2е строчки?

[maladoy]

1-имя программы
2-говорит о том что приложение консольное

[Archetype]

ага, понятно, спасибо. Код алекса надо в форму вставлять?

PS полез в книжку смотреть что такое консольные приложения

[Alex_FF]

Это консольное приложение, в форме оно работать не будет. Вставляй код в консольный проект. File -> New -> Other -> Console Application

[Archetype]

выдает множество ошибок куда бы не вставлял...
я так понял раз она консольная то на форме ничего создавать не надо?