3)Exercício:

program exemplo;
var val, num: integer
begin
__val:=5;
__num:=8
__if (5>=1 E 5<=8) then
__begin
___write (5); (porq a condiçao que ela deu e verdadeira)
__end;
__else;
___begin
____write (num);
___end;
end.