Registriert seit: 22. Sep 2004
Ort: Hannover
1.807 Beiträge
Delphi 10.2 Tokyo Starter
|
Re: Wie erstelle ich eine nonVCL-Anwendung
12. Okt 2005, 17:11
Hallo ,
sowas?
Delphi-Quellcode:
program Project1;
{$APPTYPE CONSOLE}
uses
SysUtils;
var
Zahl1, Zahl2: Integer;
begin
Writeln('Bitte geben Sie eine Zahl ein.');
Readln(Zahl1);
Writeln('Bitte geben Sie noch eine Zahl ein.');
Readln(Zahl2);
Writeln(IntToStr(Zahl1) + '+' + IntToStr(Zahl2) + '=' + IntToStr(Zahl1 + Zahl2));
Readln;
end.
MfG
freak
Christian
IT: Schließen Sie bitte das Fenster. User: Die Tür auch?
i++; // zaehler i um 1 erhoehen
|