Ein- und Ausgabe

Aus ProgrammingWiki

Archivierte Version vom 2011-01-13T04:53:17+00:00. Aktuelle Version

function eingabe: real;
 begin
  result:=strtofloat(inputDialog('Deine Zahl:'));
 end;

writeln(floattostr(eingabe));
showMessage('Deine Zahl war: '+eingabe);