Zapis do pliku i odczyt z pliku [PASCAL]

Question

Witam,

chcialbym zapisac dane do pliku tekstowego:

program project1;
uses crt;
var
  pt : Text;
  wi : string;
  zahl1 : Integer;
  zahl2 : Integer;
  zahl3 : Integer;

begin

  clrscr;
  writeln('Zapisywanie na dysk pliku tekstowego. Aby Zakonczyc wprowadz pusta linie');
  assign(pt,'dane1.txt');
  rewrite(pt);

  ReadLn (zahl1);
  ReadLn (zahl2);
  ReadLn (zahl3);

  WriteLn (pt, zahl1);
  WriteLn (pt, zahl2);
  WriteLn (pt, zahl3);

  close(pt);
  writeln('Zapisywanie pliku zakonczone');
end.                        

Teraz chcialbym odczytac dane z tego pliku do tych samych zmiennych w tej samej kolejnosci, ale nie wiem jak sie za to zabrac. Probowalem tak:

    reset(pt);
    read (pt, zahl1);
    readl (pt, zahl2);
    readl (pt, zahl3);
   
    close(plik);

Lecz nie dziala, rozwiazaniem byloby uzycie tablicy i wczytywanai zmiennych do niej, ale pojawia sie problem, gdyz mam rozne nazwy zmiennych i nie wiem jak moge wczytac 1 linie do 1. zmiennej, 2. do 2. zmiennej itd. Czy wiecie jak to zrobic?

Pozdrawiam DragonCoder