program
Visitenkarte;
// Programmanfang, Programmname
{$APPTYPE CONSOLE} // Steht für die Bildschirmausgabe in jedem Programm
uses sysutils;
// Steht auch in jedem Programm: Bibliothek sysutils
var name, ort : String;
//Variablendeklaration oder Variablenvereinbarung
begin
// hier beginnt der Rumpf
writeln('Visitenkarte');
//Textausgabe "Visitenkart"
writeln;
//Leerzeile
write('Welchen Vornamen hast du? '); //Textausgabe:" Welchen Vornamen hasr du?"
readln(name);
//Eingabe in die Variable name Bsp.: Max
write('Wo wohnst du? '); //Textausgabe: "Wo wohnst du?"
readln (ort);
//Eingabe in die Variable ort: Bsp.: Buskow
writeln;
//Leerzeile
writeln('Hallo ',name,' aus ',ort,'!'); // Ausgabe: "Hallo Max aus Buskow!
readln;
// Sollte immer vor dem letzten end stehen "Drücke ENTER zum Abbruch"
end.
//Programmende
Hinweis: Hinter den beiden Strichen '//' steht ein Kommentar.