bruker namespace std;
Disse linjene inkluderer de nødvendige header filer og sett namespace å bruke
3
sett markøren der du ønsker å sjekke. for palindromes . Skriv inn følgende kode :
string ord ;
bool palindrom ;
domstol << " Skriv inn en streng: ";
cin > > ord ;
Den første linjen skaper en streng variabel . Den andre lager en boolsk variabel som holder verdien av om strengen er en palindrom eller ikke . Den tredje linjen ber brukeren om å skrive inn en streng og den fjerde lagrer det til strengvariabelen
4
Skriv inn følgende kode :
for ( int x = 0 , x. < word.length ( ) -1 ; x + + ) {
if ( ! ordet [ x ] = ' ' ) {
if ( tolower (word [ x ] ) = tolower ( ! ordet [ word.length ( ) - ( x +1 ) ] ) ) {
palindrom = false;
pause,
}
else { palindrom = true; }
}
}
for loop begynner å sjekke strengen . Den første hvis setningen sjekker for å se om karakteren er en plass . Hvis så , hopper den det. Den neste hvis setningen konverterer strengen til små bokstaver og sjekker det mot den reverserte strengen , tegn for tegn . Hvis noen av tegnene ikke svarer , bryter funksjon fordi strengen er ikke et palindrom . Ellers er det et palindrom og den boolske variabelen er satt til sann
5
Skriv inn følgende kode : .
If ( palindrom ) domstol << " Strengen er en palindrom ";
annet domstol << " strengen er ikke et palindrom ";
Disse linjene sjekke palindrom variable og hvis det er sant , informerer brukeren strengen er en palindrom . Hvis ikke, forteller det om brukeren er det ikke .
Visual Basic
6
Åpne et nytt Visual Basic program . Dobbeltklikk Label, tekstboksen og Button kontroller for å legge en av hver til skjemaet . Ordne dem slik du ønsker .
7
Dobbeltklikk på " Button1 " kontroll for å åpne " button1_click " subrutine . Skriv inn følgende kode :
Dim frem As String = UCase ( TextBox1.Text )
fremover = Replace (forward , "", "")
Dim bakover As String = StrReverse (forover )
Den første linjen skaper en streng variabel . Det får melding om at brukeren skriver inn i tekstboksen og konverterer tegn til store bokstaver. Den andre linjen fjerner alle mellomrom i strengen . Den tredje linjen lager en kopi av den opprinnelige strengen , men reverserer tegnene
8
Skriv inn følgende kode : .
P Hvis fremover = bakover Deretter
Label1 . text = " strengen er et palindrom . "
Else
Label1.Text = " strengen er ikke et palindrom . "
End If
hvis setningen sjekker for å se om de to strengene er like. Hvis de er , er den opprinnelige strengen brukeren har skrevet et palindrom . Hvis de ikke er like, er strengen ikke et palindrom .
PHP
9
Åpne en HTML-fil . Sett markøren der du ønsker å se etter palindromes
10
Skriv inn følgende kode : .