This is default featured slide 1 title

Go to Blogger edit html and find these sentences.Now replace these sentences with your own descriptions.

This is default featured slide 2 title

Go to Blogger edit html and find these sentences.Now replace these sentences with your own descriptions.

This is default featured slide 3 title

Go to Blogger edit html and find these sentences.Now replace these sentences with your own descriptions.

This is default featured slide 4 title

Go to Blogger edit html and find these sentences.Now replace these sentences with your own descriptions.

This is default featured slide 5 title

Go to Blogger edit html and find these sentences.Now replace these sentences with your own descriptions.

Popular Posts

Mostrando postagens com marcador desafios. Mostrar todas as postagens
Mostrando postagens com marcador desafios. Mostrar todas as postagens

sexta-feira, 28 de janeiro de 2011

Desafio01 - PROGRAMA CRIPTOGRAFIA


Crie um programa de criptografia de mensagem de texto.


O Programa deve ter um menu onde o usuario escolhe: 1- criptografar 2- descriptografar 3- sair do programa.
A mensagem de texto criptografada deve virar letras ou números.
Utilize a linguagem Pascal ou C


- Para autores do blog: assim que terminar o programa coloquem o código nesse post, náo esquecendo de em cima do código colocar seu nome.

- Para visitantes: mande seu codigo nos comentários do post.

*lembrando que o programa PODE ter restrições como: não usar letras maiusculas ou números na mensagem a ser criptografada.

-------------------------------------------------------------------------------------------

Exemplo básico de criptografia: Inverter a frase - em pascal com explicações

Program Criptografia ;
var f,fc:string; //variavel f é a frase digitada, fc vai ser a frase criptografada
i,j,p:integer; //variaveis pra auxiliar as posições
Begin //inicio do programa
Writeln('Digite a Frase');
Readln(f); //f vai receber a frase
j:=length(f); //contar quantos caracteres tem na frase
p:=j;
i:=1;
Repeat
fc[p]:=f[i]; //a posição p da frasecrip vai receber a letra que tiver na posicao i da frase
p:=p-1;
i:=i+1;
Until (i=j+1); //até o fim da frase
For i:=1 to j do
begin
Write(fc[i]); //escrever a frase criptografada na tela
end;

End. //fim do programa
-------------------------------------------------------------------------------------------

Compiladores de Pascal: PascalZim - DevPascal
Compiladores de C: Borland C++