Quai será o valor exibido na tala pelo algoritimo a segir?

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 que será apresentado pelo algoritimo vai ser 5

program exemplo;
var val, num: integer;
begin
___ val:=5;
___ num:=8;
____if (val >=1 E val<=8) then
_____begin
_______write (val);
_____end;
____else
_____begin
_______write (num);
_____end;
end.
O resultado que será mostrado na tela é 5

var val1,val2:integer;
begin
readln(val1);
readln(val2);
if (val1>val2) then
writeln (val1);
else
if(val2>val1) then
writeln (val2);
if (val1 mod 2) = 0 then
writeln ('numero par');
else
writeln ('numero impar');
if val2 mod 2 = 0 then
writeln ('numero par');
else
writeln ('numero impar');
end.

A tecnologia teve avanços inesperados pelo homem. O homen de 1960 imaginava um computador do futuro com 1000 valvulas e com aproximadamente 1000 Kg e o que ele obteve foi um computador com menos de 1 Kg e sem nenhuma valvula.