Сделать на паскале Напишите программу, которая заменяет - вопрос №16686085 от liliyaabramova1 16.09.2020 09:54

Question

Информатика: Сделать на паскале Напишите программу, которая заменяет в символьной строке все буквы «а» на буквы «б» с цикла «пока» (while): 2) 11. Запишите какое значение будет иметь переменная s после вы-полнения фрагмента программы s:= 123456789 вставить( ABC , s, 3) s:= 123456789 ; Insert( ABC , s, 3);

liliyaabramova1 · Answer

1)var  S : String; begin  readln(s); while (Pos( а , S) 0) or (Pos( a , S) 0) do    begin      if Pos( а , S) 0 then        S[Pos( а ,S)] := б          else            S[Pos( a , S)]:= b ;    end; writeln(S); end.2)12ABC3456789...