simple atomuhr gesucht

[Marco Steinebach]

Hallo Leute,
erstmal vielen Dank für eure Antworten. So professionell soll's gar nicht werden. Gibt's denn, um himmelswillen, nicht sowas wie:
program MeineUhr;

var
internet: ...

begin
öffneVerbindungZumServer('zeitserver');
s := LadeDieZeitRunter;
s := LoescheUeberfluessigesZeugs;
writeln('Es ist jetzt ',s, ' Uhr!');
end.

Für Hilfe wäre ich dankbar!
Viele Grüße
Marco