Program escola;
var v1,v2 par: integer;
begin
read (v1,v2);
if (v1,v2);
write(v1);
else
if(v2>v1)then;
write (v2);
if (v1 mod 2=o) then;
write("o valor é par");
else
write(impar)
end.

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

program exemplo;
var val,
num:
integer;
begin
val:=5;
num:=8;
if (5>=1 E 5<=8) then
begin(Ira atender só o 1º comando pois as duas condições sao verdadeiras)
write (5);
end;
else
begin
write (8);
end;
end.
R= 5