Algoritmo

Program thales;
var num: integer;
begin
______read(num)
___if(num>(num MOD 5))then
___write("é maior");
___else
___if(num<(num MOD5))then
___write("é menor");
___end;
__________if(num MOD2=0)then
__________write("par");
__________else
__________write("impar");
__________end;
end.

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.

Novo satélite CBERS foi testado nesta segunda-feira

O satélite CBERS-3 foi testado nesta segunda-feira, seu lançamento está previsto para 2011 e CBERS-4 para 2014. Três satélites do programa CBERS ja estão em órbita, são eles CBERS 1, 2 e 2B, os satélites do programa CBERS servem ao Brasil para monitorar desmatamentos, a expansão urbana e da agropecuária o programa é um resultado da parceria do Brasil com a China.