quarta-feira, 2 de dezembro de 2009

segunda-feira, 19 de outubro de 2009

program klei;
num integer;
begim
read (num)
if(num>(num MOD 5))then;
write ("é maior");
else
if (num<(num MOD5))then
write("é maior");
end;
if(num MOD2=0)then;
write("par");
else
write("impar");
end;
end.

quarta-feira, 16 de setembro de 2009

exercicio 3

program kleiton;
var num1,num2:interger;
impar,par:string;
BeginReadln(num1);
Readln(num2);
If (num1>num2) ThenWriteln (num1);
ElseIf(num2>num1) ThenWriteln (num2);
If (num1 MOD 2) = 0 ThenWriteln ('Par');
ElseWriteln ('Impar');
End.
O resultado que será mostrado na tela é 5

exercicio 2

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

Exercicio 1

program_kleiton;
var val1,val2:integer;
beginreadln(val1);
readln(val2);
if (val1>val2) thenwriteln (val1);
elseif(val2>val1) thenwriteln (val2);i
f (val1 mod 2) = 0 thenwriteln ('numero par');
elsewriteln ('numero impar');
if val2 mod 2 = 0 thenwriteln ('numero par');
elsewriteln ('numero impar');
end.

quarta-feira, 9 de setembro de 2009


Uma das TVs "sem bordas" anunciadas pela LG no evento

Já na área de notebooks e tablets, a Samsung e a Toshiba também apresentaram algumas novidades. A Samsung apresentou seu notebook "ultrafino" batizado como X3.