ce trebuie sa corectez?sa sterg sau sa adaug 30 pcte dau
Anexe:

facebookaugusti:
Ai multe greseli...Scrie-mi conditia problemei si iti voi explica.
Răspunsuri la întrebare
Răspuns de
1
Problema trebuia sa arate in felu urmator:
Program Pn;
s:string;
i,n:integer;
begin
Writeln('Dati sirul');
readln(s);
for i:=1 to length(s)
begin
if (s[i]='M') and (s[i+1]='E') then s[i]:='L';
end;
Writeln('Dupa schimbare:');
Writeln(s);
readln;
end.
Program Pn;
s:string;
i,n:integer;
begin
Writeln('Dati sirul');
readln(s);
for i:=1 to length(s)
begin
if (s[i]='M') and (s[i+1]='E') then s[i]:='L';
end;
Writeln('Dupa schimbare:');
Writeln(s);
readln;
end.
Alte întrebări interesante
Matematică,
9 ani în urmă
Geografie,
9 ani în urmă
Matematică,
9 ani în urmă
Matematică,
9 ani în urmă
Matematică,
9 ani în urmă
Limba română,
9 ani în urmă
Geografie,
9 ani în urmă