Aprire un C + + file di programma . Inserire il cursore nella parte superiore del file
2
digitare il seguente codice : .
# Include # include using namespace std; Queste linee includono i file header necessari e impostare lo spazio dei nomi da utilizzare Inserisci il cursore dove si desidera controllare . per palindromi . Digitare il seguente codice : ; bool palindromo ; cout << " Inserisci una stringa :"; cin > > parola ; La prima riga crea una variabile stringa . Il secondo crea una variabile booleana che contiene il valore di se la stringa è palindroma o meno. La terza linea richiede all'utente di digitare una stringa e il quarto lo salva nella variabile stringa Digitare il seguente codice: for (int x = 0; x . < word.length ( ) -1 ; x + + ) { if ( ! parola [ x ] = '') { se ( tolower ( parola [ x ] ) = ToLower ( ! parola [ word.length ( ) - ( x +1 ) ] ) ) { palindromo = false; break; } else { palindromo = true ; } } } il ciclo inizia il controllo della stringa . La prima istruzione if verifica per vedere se il carattere è uno spazio. Se è così , salta esso. La prossima istruzione if converte la stringa in caratteri minuscoli e la confronta con la stringa inversa , carattere per carattere . Se uno qualsiasi dei personaggi non corrispondono, la funzione si rompe perché la stringa non è un palindromo . In caso contrario , si tratta di un palindromo e la variabile booleana è impostata su true digitare il seguente codice : . Se ( palindromo ) cout << " La stringa è un palindromo " ; else cout <<" la stringa non è palindroma " ; Queste linee controllano la variabile palindromo e se è vero , si informa l'utente della stringa è un palindromo . In caso contrario , si dice che l'utente non lo è. Aprire un nuovo programma di Visual Basic . Fare doppio clic sui controlli Label , TextBox e Button per aggiungere uno di ciascuno alla forma . Disporli come si vorrebbe . Fare doppio clic sul controllo " Button1 " per aprire il sottoprogramma " Button1_Click " . Digitare il seguente codice : Dim avanti As String = UCase ( TextBox1.Text ) per avanti = Replace ( in avanti , " " , " " ) per Dim indietro As String = StrReverse (avanti ) per La prima riga crea una variabile stringa . Si ottiene il messaggio che l'utente digita nella casella di testo e converte i caratteri in maiuscolo. La seconda linea rimuove tutti gli spazi nella stringa . La terza linea fa una copia della stringa originale, ma inverte i caratteri digitare il seguente codice : . Avanti = indietro Poi Label1 . text = " La stringa è palindroma ". Else Label1.Text = " La stringa non è un palindromo . " End If l' istruzione if verifica per vedere se le due stringhe sono uguali . Se lo sono, la stringa originale digitato dall'utente è un palindromo . Se non sono uguali , la stringa non è un palindromo . aprire un file HTML . Inserire il cursore dove si desidera verificare la palindromi digitare il seguente codice : .
3
parola stringa
4
5
Visual Basic
6
7
8
PHP
9
10
Programmazione © www.354353.com