Ingrid

1) Faça um algoritmo que leia 2 valores inteiros, calcule e escreva qual deles é maior, bem como escrevendo se estes valores são pares ou ímpares.

Program Luz;
var val1,val2: integer;
Begin
readln (1, 2)
if (1 < 2) then
writeln ( 1 );
if (2 > 1) then
write ln( 2 );
If (1 mod 2=0) then
writeln ('par');
else
write ('impar');

if (2 mod 2=0) then
writeln ('par');
else
write ('impar');

end.