👤
00ZAIA00EZ
a fost răspuns

De la tastatura se introduce un sir de caractere prezentat de variabila s. Determinati daca sirul respectiv este palindrom (la citirea inversa se obtine acelasi sir, de exemplu cojoc).

Răspuns :

Program Tema;
uses sysutils;

var s,invers:string;
    c:char;
Begin
invers:='';
writeln('Introduceti sirul:');
readln(s);
for c in s  do
begin
invers:=c+invers;
end;
if comparestr(s,invers)=0 then
writeln('Sirul este palindrom')
else
writeln('Sirul nu este palindrom');

End.
Vă mulțumim că ați vizitat platforma noastră dedicată Informatică. Sperăm că informațiile oferite v-au fost utile. Dacă aveți întrebări sau aveți nevoie de asistență suplimentară, nu ezitați să ne contactați. Așteptăm cu nerăbdare să vă revedem și nu uitați să ne salvați în lista de favorite!


Ez Askings: Alte intrebari