Ia ghici cum se face?
var s:string; aux:char; i:integer;
Begin
readln(s);
For i:=1 to length(s) div 2 do
begin
aux:=s[i];
s[i]:=s[length(s)-i+1];
s[length(s)-i+1]:=aux;
end;
write(s);
readln;
End.
Si daca vreau sa afisez doar anumite litere. sa zicem dintr-o propozite sa afisez doar literele a si b dar lipite. e corect if(s[i]='a') or ( s[i]='b') then write(s[i])? se vor afisa lipite gen ababab?
anonim_4396 întreabă: