Zadanie z Turbo Pascala

[Nora]

Witam serdeczne !
Czy umie ktoś z was zrobić takie zadanie z turbo pascala,
bo mój kuzyn poprosił mnie o pomoc ale ja z programowaniem nie miałem nigdy doczynienia.

1.Napisz program, który wymnoży dwie dowolne liczby rzeczywiste i wyświetli wynik na monitorze.

[Czarodziejczarek]

program DlaNora;
uses crt;
var x1,x2,d: real; - real oznacza liczby rzeczywiste
begin -początek programu
writeln ('podaj x1'); - komputer prosi o 1 liczbe podajesz ja z klawiatury i klikasz enter
readln(x1); -wczytanie
writeln ('podaj x2'); komputer prosi o 2 liczbe podajesz ja z klawiatury i klikasz enter
readln(x2); -wczytanie
d:=x1*x2; <-- komputer je wymnarza
write('d'); - pokazuje na kompie
writeln(d:5:3); - nie pamiętam co to jest miałem turbo pascala bardzo dawno temu ale ma to związek z przestawieniem tej liczby czy jakoś tak. chyba chodzi ze będzie pokazywać cos w tym stylu 12355,693 czyli 5 cyfr po lewej stronie od przecinka i 3 po prawej stronie od przecinka
readln;
end.

Uwaga : nie pisz w programie komentarzy oki pozdrawiam, tylko to co jest pogrubione

[Czarodziejczarek]

A tak wogólę to myślę że tan program jest oki tylko nie jestem całkiem niego pewny sprawdź tylko dokładanie skopiuj literka po literce znak po znaku...
więcej informacji możesz uzyskać na typowych forach internetowych dla turbo pascala ( tak mi się wydaje)
raz jeszcze pozdrawiam. mam nadzieje że starzy wyjadacze mnie nie zlikwidują z tego forum...
narka