palindroma
Publicado por Perfil removido 27/12/2007
[ Hits: 5.302 ]
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.
Metodo de Ordenacion : Burbuja
soma da diagonal principal de uma matriz
Nenhum coment�rio foi encontrado.
Aprenda a Gerenciar Permissões de Arquivos no Linux
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
Quebra de linha na data e hora no Linux Mint
Organizando seus PDF com o Zotero
tentando instalar em um notebook antigo o Linux LegacyOS_2023... [RESO... (9)
Problema com Conexão Outlook via Firewall (OpenSUSE) com Internet Fibr... (5)