Se citeste de la tastatura un numar mai mare decat 1000.Verificati daca numarul este palindrom(un nr este palindrom daca citit de la stanga la dreapta este egal cu numarul citit de la dreapta la stanga) . Am incercat eu dar nu mai stiu sa continui:
program numar;
var n,m,i,aux :integer;
begin
repeat
write('n=');readln(n);
until(n>1000);
m:=n;
aux:=0(daca nu e bine pana aici va rog sa ma corectati si sa il continuati ca nu stiu cum sa il mai fac mai departe)VA ROG !!! :* :*
Răspunsuri la întrebare
Răspuns de
0
În ce limbaj vrei pascal, Borland c++, sau în limbaj pseudocod ?
Kamy:
In pascal
La aux pui diferit de zero. Apoi îți trebuie o variabila inv care inițial este egala cu zero, apoi faci inv =inv *10+aux %10; iar aux =[aux /10].
Și pui condiția dacă inv =x,atunci este palindrom, altfel nu.
Alte întrebări interesante
Limba română,
9 ani în urmă
Matematică,
9 ani în urmă
Engleza,
9 ani în urmă
Ed. tehnologică,
9 ani în urmă
Matematică,
9 ani în urmă
Matematică,
10 ani în urmă