Utente:Xno~itwikibooks
Aspetto
program username; var name;string[60]; user crt; begin
clrscr; writeln("inserisci il nome"); readln("name"); clrscr; writeln("benvenuto, ',name"); clrscr; writeln("qual'è il tuo soprannome"); readln("surname"); clrscr; writeln("che brutto"); readkey;
end.
program number; var number;string[100]; user crt;
clrscr; writeln("scegli un numero"); readln("number"); clsscr; writeln("hai scelto un numero da sfigato") readkey;
end.