Question

elaborati un progtam pascal care afiseaza pe ecran in ordine inversa sirul de caractere citit de la tastarura

Answer 1

Program Tema;

Var s,inv:string;
      i:integer;
Begin
inv='';
writeln('Introduceti sirul de caractere: ');
readln(s);

for i=1 to Length(s) do
begin
inv:=s[i]+inv;
end;
writeln('Sirul inversat este: ');
writeln(inv);
End.