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