Hi,
du hast hier keine Form.Create events.
Du musst alles per ReadLn abfragen.
Z.B.
Delphi-Quellcode:
program Project2;
{$APPTYPE CONSOLE}
uses
SysUtils;
var
Zahl1, Zahl2, Ergebnis: Extended;
begin
WriteLn('Hallo');
WriteLn('Gib zwei Zahlen ein. Ich werde sie für dich addieren');
ReadLn(Zahl1); // Zahl1 einlesen
WriteLn('Die zweite Zahl');
ReadLn(Zahl2); // Zahl2 einlesen
Ergebnis := Zahl1 + Zahl2; // Rechnen
WriteLn('Das Ergebnis lautet: ' + FloatToStr(Ergebnis)); //Ausgabe
Sleep(2000);
end.
Ist jetzt sehr primitiv. Aber so ungefähr musst du dein Programm aufbauen.
[edit] Verdammt, erst lesen dann schreiben. [/edit]