Einzelnen Beitrag anzeigen

Benutzerbild von freak4fun
freak4fun

Registriert seit: 22. Sep 2004
Ort: Hannover
1.807 Beiträge
 
Delphi 10.2 Tokyo Starter
 
#5

Re: Wie erstelle ich eine nonVCL-Anwendung

  Alt 12. Okt 2005, 16: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
  Mit Zitat antworten Zitat