wheatus

Po wpisaniu kodu powyżej podczas kompilacji wyskakuje błąd: "Error 3: unknown identifier"

To znowu ja. Chcę napisać program, który najpierw wyświetla kilka zdań, potem liczy iloczyn 2 liczb podanych przez użytkowników, a na koniec na środku ekranu ma się pojawić napis "Do Widzenia".
Napisałem takie coś:
begin
writeln('Pierwsze zdanie');
writeln('Drugie zdanie');
writeln('Trzecie zdanie');
readl;
end.
var
liczba1,liczba2:longint;
begin
writeln('Podaj pierwszą liczbę:');
readln(liczba1);
writeln('Podaj drugą liczbę:');
readln(liczba2);
writeln('Ich iloczyn wynosi:',liczba1*liczba2);
readln;
end.
uses crt
begin
clrscr;
gotyxy(30,30);
write('Do Widzenia');
readln;
end.

I mam dwa problemy:
Po wyświetleniu "Trzecie zdanie" i wcisnięciu enter program się zamyka. Co robię źle?
Jakie są współrzędne środka ekranu?

Teraz już działa, wielkie dzięki. Idę się uczyć dalej.

Nadal nie dziala. Otwieram program wyskakuje "Jak masz na imię?" i wpisuje swoje imię . To powitanie ma się pojawić zaraz po wpisaniu imienia, czy muszę coś nacisnąć? Może ja coś robię źle. Uczę się z tej strony: http://turbopascal.skryptoteka.pl/3.html