program Project1; {$APPTYPE CONSOLE} uses SysUtils; var navn: String; //navn bliver defineret som en string variabel efternavn: String;begin Write('Hejsa, hvad hedder du? '); Readln(navn); Writeln('Ok, du hedder altså ', navn, ': ) ') ;Writeln('Hvad så med dit efternavn?');Readln(efternavn);Writeln('Ok, dit efternavn er altså ', efternavn, ' : ) ')Readln //Gør at programmet ikke lukker med det sammeend. Med Venlig Hilsen: CHadi