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).