Pascal wyłączenie koputera po ostatniej linijce

Witam.Dopiero zaczynam moją przygodę z programowaniem i ciekawi mnie jaką kod wpisać aby po wykonaniu automatycznie wyłączył sie komputer.

Mój właściwie pierwszy banalny programik:

Program testprog;
Uses     crt;

Var imie		: string; {imie - przechowuje imie podane przez usera}
	nazwisko	: string; {nazwisko - przechowuje nazwisko podane przez usera}
    dzien		: byte;   {dzien - dzien podana przez usera}
    miesiac		: byte;   {miesiac - miesiac podana przez usera}
	rok			: integer;   {rok - rok podana przez usera}
begin
	{Wprowadzanie danych}
	WriteLn('Podaj swoje imie ?');
	ReadLn(imie);
	WriteLn('Podaj swoje nazwisko ?');
	ReadLn(nazwisko);
	WriteLn('Ktorego dnia sie urodziles ?');
	ReadLn(dzien);
	WriteLn('Ktorego miesiaca sie urodziles ?');
	ReadLn(miesiac);
	WriteLn('Rok urodziles?');
	ReadLn(rok);

    {Wypisywanie danych}
	WriteLn('Witaj ',imie,' ',nazwisko,' Urodziles sie: ',dzien,'.',miesiac,'.',rok);
        ReadLn;

end.

nie wiem jaki tu dodać kod żeby po wyświetleniu się Wita.... i kliknięciu enter automatycznie sie wyłączył komputer

a pod czym to bedzie pracowac?
dos, xp?

Xp i teraz 7

Ale bardziej po XP

to musisz uzyc zewnetrznego programu - nie wim jak 7 ale xp ma systemowy programik shutdown.
musisz go zwyczajnie uruchomic przez swoj program z odpowiednim parametrem.
zerknij tu:
Dlaczego nie działa procedura EXEC
i potem tu:
http://ss64.com/nt/shutdown.html

mógłbyś mi to wpisać w ten moj program bo nie umiem sie w tym połapać jeszcze co gdzie wstawić żeby pykało.

jestes tak leniwy czy tak szybko sie poddajesz?

Po 1) Piszesz w Pascalu pod Windows 7? Po co??
Po 2) Poczytaj na MSDN o ExitWindowsEx

Znaczy już z 50 kombinacji co w internecie znalazłem to dołączyłem do programu i nigdy nie pykło :/.
Używam Free Pascal.Nie mogę załapać gdzie to wpisać żeby było dobrze i jaką bibliotekę dać

A kolega się pyta po co

Bo chodzie do TI - Technikum Informatyczne i zaczynamy najpierw od Pascala naszą "zabawe z programowaniem"