Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- program UnicornQueeeest;
- var
- username : string;
- old : byte;
- begin
- writeln('[PNJ] Bien le bonjour, cher aventurier!');
- writeln('[PNJ] Comment t''appelles-tu?');
- readln(username);
- writeln('[Aventurier]', username );
- writeln('[PNJ] Mes sincères salutations, M.', username);
- writeln('[PNJ] Et dis moi... quel âge as-tu?');
- readln(old);
- writeln('[Aventurier] ', old,' ans');
- if old > 18 then
- begin
- writeln('[PNJ] Oh! Tu as ', old , ' ans ! Tu as donc l''âge requis pour ta première... monture!');
- end;
- end.
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement