exercio2
progran murilo;
var val, num: Integer;
Begin
Val : =5;
Num: =8;
lf(5 MOD 2 = 0) Then
(5 MOD 2 = 1 entao nao vai ser igual a 0);
Begin
Writeln(5);
(ao vai ser esse o valor certo);
Else
Begin
Write(8);
End.
Entao o resultado certo sera o (8);