Ein- und Ausgabe

Aus ProgrammingWiki

Archivierte Version vom 2011-01-13T04:54:46+00:00. Aktuelle Version

var eingegeben:real;

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

eingegeben := eingabe();
writeln(floattostr(eingegeben)); // die Umwandlung ist nicht zwingend nötig
showMessage('Deine Zahl war: '+eingegeben);