quarta-feira, 16 de setembro de 2009

3) - 3

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

3) - 2

program cs;
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.

A Resposta do algoritmo será 8

3) - 1

Program nel;
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.

terça-feira, 15 de setembro de 2009

IPHONE


O iPhone é um smartphone desenvolvido pela Apple Inc. com funções de iPod, câmera digital, internet, mensagens de texto (SMS), visual voicemail e conexão wi-fi local. A interação com o usuário é feita através de uma tela sensível ao toque. A Apple registrou mais de duzentas patentes relacionadas com a tecnologia que criou o iPhone.