{ File: maggiore.pas } { Scopo: primo esempio sull'uso di if-then-else } program Maggiore; { Legge due numeri e ne stampa il maggiore. } var primo, secondo, maggiore : integer; begin writeln('Primo numero ? '); readln(primo); writeln('Secondo numero ? '); readln(secondo); if primo > secondo then maggiore := primo else maggiore := secondo; writeln('maggiore : ', maggiore) end. { Maggiore }