palindroma
Publicado por Perfil removido 27/12/2007
[ Hits: 5.103 ]
Programa simples que lê uma string e verifica se é um palíndroma.
Palíndroma é uma palavra que é igual se lida ao contrário (ex. ana;lol;ata...).
program pa; var frase,n2,t:string; i,x:integer; begin clrscr; readln(frase); x:=length(frase); for i:=x downto 1 do begin t:=copy(frase,i,1); n2:=n2+t; end; writeln(n2); if n2=frase then writeln(frase,' e um palindroma') else writeln(frase,' n e um palindroma'); readln; end.
Array de números aleatórios não-repetidos de um intervalo em Pascal
Calculadora utilizando until e case
Calculadora Completa feita no Lazarus(Delphi 7 para Linux)
Nenhum comentário foi encontrado.
Como escolher o melhor escalonador de CPU para melhorar o desempenho da máquina
Curiosidade sobre DOOM Guy e Isabelle de Animal Crossing
Inicializando servidor Ubuntu na AWS e rodando apache em Container
Instalando TeamViewer no Debian 12
Conheça o Octopi, outro frontend para o Pacman com acesso ao AUR (Arch Linux e derivados)
Terminal transparente no Debian 12 com interface i3wm usando Xfce4-Terminal e Compton
O que é isso no meu navegador? [RESOLVIDO] (5)
Eu estou com problemas para usar o QBASIC no Dosbox X (2)
Ubuntu simplesmente morreu (8)
Como colocar uma assinatura digital em um código compilado ! (2)