3° program c;
var val, num: integer;
begin
___ val:=3;
___ num:=8;
____if (val >=1 E val<=8) then
_____begin
_______write (val);
_____end;
____else
_____begin
_______write (num);
_____end;
____end.
resultado 3.

2° program a ,var val num: integer;
begin
val:=5;
num:=8;
if (5 MOD 2= 0) then (5 mod 2 nao vai ser = a 0 e sim 1)
begin
write (val); (como 5mod 2 nao é 0 entao nao vai receber esse comando)
end;
else
begin ( irá receber este comando)
wrinte;
end.