3) Qual será o valor exibido na tela pelo algoritmo a seguir?

program exemplo;
var val, num: integer;
begin
val:=5;
num:=8;
if (val >=1 AND val<=8) then
begin
write (val);
end;
else
begin
write (num);
end;
end.

O Resultado será 5.

2) Qual será o valor exibido na tela pelo algoritmo a seguir?

program exemplo;
var val, num: integer;
begin
val:=5;
num:=8;
if (val MOD 2= 0) then
begin
write (val);
end;
else
begin
write (num);
end;
end.

O Resultado será 8

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.