Algoritmo exercício 3

program exemplo;
var val, num: integer;
begin
___ val:=5;
___ num:=8;
____if (val >=1 E val<=8) then
_____begin
_______write (val);
_____end;
____else
_____begin
_______write (num);
_____end;
end.

O resultado que será mostrado na tela é 5

Algoritmo exercício 2

2) Qual será o valor exibido na tela pelo algoritmo a seguir?

program exemplo;
var val, num: integer;
begin
___ val:=5;
___ num:=8;
____if (val MOD 2= 0) then
_____begin
_______write (val);
_____end;
____else
_____begin
_______write (num);
_____end;
end.

O resultado que será apresentado pelo algoritmo é 8

Algoritmo exercício 1

program_thales;

var val1,val2:integer;

begin
readln(val1);
readln(val2);
if (val1>val2) then
writeln (val1);
else
if(val2>val1) then
writeln (val2);
if (val1 mod 2) = 0 then
writeln ('numero par');
else
writeln ('numero impar');
if val2 mod 2 = 0 then
writeln ('numero par');
else
writeln ('numero impar');
end.