Dati due numeri G e M, il giorno e il mese della tua data di nascita, calcola il tuo numero fortunato (la loro somma se sei nato in un giorno pari altrimenti la loro differenza…)
Esempi
Istanza | Elaborazione | Risposta | |
1 | G=4 M=6 |
4/2=2 con resto 0 4+6=10 |
10 |
---|---|---|---|
2 | G=5 M=6 |
5/2=2 con resto 1 5-6=-1 |
-1 |
CODICE
Program Pari; Var G, M: Integer; x: Integer; Begin Write('Giorno = '); Readln(G); Write('Mese = '); Readln(M); If((G Mod 2) = 0) Then Begin x:=G+M; End Else Begin x:=G-M; End; Writeln('Il tuo numero fortunato: '. x); ReadLn; End.
Codice più compatto…
... If((G Mod 2) = 0) Then x:=G+M Else x:=G-M; Writeln(x); ...
L’operatore Mod calcola il resto della divisione intera (modulo).