pomozcie napisac program

Musze napisac taki program:
W plikach tekstowych o nazwach liczby1.txt oraz liczby2.txt zapisana jest pewna ilosc liczb naturalnych. Każda liczba zapisana jest w oddzielnej linijce. Twoim zadaniem jest utworzenie pliku tekstowego o nazwie wynik.txt, zawierajacego odpowiedzi na ponizsze pytania.
A) Ile razy wystepuje w pliku liczby1.txt cyfra 8 ?
B) Podaj zbior wszystkich liczb wystepujacych jednoczesnie w plikach liczby1.txt oraz liczby2.txt.

Prosze o pomoc np jakies podpowieszi lub zrodlo
z gory dziekuje

[glowa]text/array/real/integer/begin/assign/while/eof/readln/writeln/close/end.+24h nauki od zera [mf]

1. Ladujesz plik do StringList or od razu na pliku jedziesz petle po wszystkich liniach, (StrToInt, If) + F1
2. Ladujesz wszystkie liczby z pierwszego pliku do tablicy, z drugiego lecisz i sprawdzasz po koolei petla, czy liczby nie ma w tablicy z liczbami pierwszgo pliku....
   Podstawy :-[ :-8 [glowa]

Czuje, ze to jednak Pascal, a nie Delphi.
Co do pierwszego. Najbardziej naiwne i malo ekonomiczne rozwiazanie:
Assign(F...
Reset(F)
while not Eof(F) do
begin
Read(F, znak);
if znak = '8' then osemek := osemek+1;
end;
Close(F);

Co do drugiego to przydaloby sie wiedziec jaka jest struktura pliku. W jaki sposob mamy odroznic liczby i czy jest to jakis skonczony zakres liczb (nie kazda liczbe da sie odczytac przez Read). Dopiero wtedy mozna wybrac najprostsza i najbardziej efektywna metode (szacowana ilosc liczb w pliku bylaby takze pomocna).