Progama exenplo:
var val, num: integer
begin
__val:=5;
__num:=8;
__if (5 MOD 2=0) then esse valor nao sera igual a 0
__begin
__write (5); nao sera este valor porq o resultado e falso
___end;
__else
__begin
___write (8) resposta sera =8
__end;
end.