program 1.6;
var val, num: integer;
begin
val:=5;
num:=8;
if (val >=1 AND val<=8) then
begin
write (val);
end;
else
begin
write (num);
end;
end.
o resultado do algorítimo será 5
Técnico em Informatica - Atividades 11/10
Há 14 anos