Размещено 5 лет назад по предмету
Информатика
от kaemelyanowa
Составить программу, вставляющую перед каждой цифрой 4 в исходной строке слово "да" uses crt; var m,k,i: integer; s,s1:string; begin Writeln('ВВедите строку: ->'); readln(s); m:=0; // for i:=1 to length(s)*2 do // begin if copy(s,i,1)='4' then // begin insert('da',s,i); // i:=i+2; // m:=m+1; // end;end; writeln; write('Количество замен: ',m); write('Новая строка: ',s); end.