1) Faça um algoritmo que leia 2 valores inteiros, calcule e escreva qual deles é maior, bem como escrevendo se estes valores são pares ou ímpares.
Program tamiris1
var v1, v2, par: integer;
begin
read("v1, v2")
if
("v1>v2") then
write ("v1")
else
write ("v2")
Begin
if
("v1 mod 2=0") then
write ("par")
else
write ("impar")
end;
end.
Nenhum comentário:
Postar um comentário