palindroma
Publicado por Perfil removido 27/12/2007
[ Hits: 5.300 ]
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.
Nenhum coment�rio foi encontrado.
Como transformar um áudio em vídeo com efeito de forma de onda (wave form)
Como aprovar Pull Requests em seu repositório Github via linha de comando
Como gerar um podcast a partir de um livro em PDF
Organizando seus PDF com o Zotero
Erro no realm join [Resolvido]
Um programa para baixar vídeos: Parabolic
Como Definir o Painel Principal em Múltiplos Monitores no Linux Mint
Sempre que vou baixar algum pacote acontece o erro dpkg (2)
BlueMail não abre no Kubuntu 25.04 (6)
Não consigo montar meu cartão SD (5)
aplicativos criados com webapp-manager não aparecem no menu do xfce (1)