A Microsoft divulgou um video com sua visao de como sera o futuro da tecnologia entre os proximos 5 a 10 anos.Segundo a Microsoft, futuramente qualquer objeto podera funcionar como uma tela tatil, como o exemplo utilizado com vidros das janelas de taxis que indicam o horario e o local de destino quando o mesmo estivesse a vista.A empresa tambem exibe oculos especiais capazes de traduzir informacoes turisticas ao usuario em tempo real.No video tambem e possivel observar a evolucao imaginada pela Microsoft para os tablets e smartphones. Os aparelhos possuirao telas dobraveis e serao do tamanho de um cartao de credito.A funcionalidade desses dispositivos tambem ira mudar. Eles poderao ser utilizados como ferramentas de gestao de comunicacao que interagem com as informacoes ao redor.Ja para ambientes fechados a Microsoft agregou as tecnologias inteligentes as mesas e geladeiras, alem de uma nova forma de escritorio, com possibilidade de maior interacao entre empresa e funcionarios.A empresa afirma que todas essas ferramentas ainda nao estao disponiveis, porem estao em fase de pesquisas e desenvolvimento pela Microsoft e empresas parceiras. fonte: http://info.abril.com.br program teste;uses crt;varft:integer;function fat(n:integer):real;beginif(n = 0)thenbeginfat:=1;endelsebeginfat:=n*fat(n-1);end;end;beginclrscr;write('Digite a fatorial:'); read(ft); writeln;if(ft < 0)thenbeginwriteln('Numero invalido!');endelsebeginwriteln('Fatorial de ',ft,' = ',fat(ft):1:0);end;readkey;end.Vamos a explicacao.function fat(n:integer):real;beginif(n = 0)then fat:=1;else fat:=n*fat(n-1);endFat(5)5*Fat(4)4*Fat(3)3*Fat(2)2*Fat(1)1*Fat(0) - iteracao nao necessaria, poderia-se alterar a condicao do If para n=1, pois fat(0) e fat(1) tem o mesmo valor.Observe que na primeira iteracao, estou mandando o 5 para a variavel N DA funcao fat, no IF a funcao verifica que N nao e igual a zero, portanto vai para o ELSE, fazendo o seguinte 5*Fat(4) (n*fat(n-1)), isso se repete ate o fim, quando a condicao do IF for verdadeira, os valores serao devolvidos ao local que foram chamados, comecando de baixo para cimaFat(5) = 120.5*Fat(4) = 5*24 = 120, envia 120 para a linha de cima4*Fat(3) = 4*6 = 24, envia 24 para a linha de cima3*Fat(2) = 3*2 = 6, envia 6 para a linha de cima2*Fat(1) = 2*1 = 2, envia 2 para a linha de cima1*Fat(0) = 1, envia 1 para a linha de cima Morre Steve Jobs, cofundador da AppleDe acordo com nota publicada no site da Apple, o ex-CEO da empresa nao sobreviveu ao cancer, doenca contra a qual lutava desde 2004, e faleceu nesta quarta-feira, aos 56 anos.Segundo nota publicada no site da Apple, Steve Jobs, cofundador e ex-CEO da empresa, faleceu hoje, quarta-feira, aos 56 anos. Nao foram divulgadas as causas exatas de sua morte, porem, e provavel que ele nao tenha resistido ao cancer, doenca contra a qual lutava desde 2004. Segue o texto em traducao livre:"A Apple perdeu um genio criativo e visionario, e o mundo perdeu um maravilhoso ser humano. Aqueles de nos que tiveram a sorte de conhecer Steve e trabalhar com ele perderam um grande amigo e um mentor que os inspirava. Steve deixa para tras uma companhia que so ele poderia ter criado. Seu espirito sera sempre a base da Apple.Mensagem da Diretoria da Apple"E com pesar que anunciamos a morte de Steve Jobs hoje.O brilho de Steve, sua paixao e energia eram a fonte