👤
Melissa0
a fost răspuns

Sa se schimbe intr-un sir de caractere combinatia MA prin TA
Urgent va rog

Răspuns :

Killmaster
Program P1;
var S:string;
       i:integer;
begin
   readln (S);
   for i:=1 to n do length (S) do
   if (S[i]='M') and (S[i+1]='A') then begin S[i]:='T';
                                                                S[i+1]:='A';
writeln(S);
end.

Alte intrebari