Помогите пожалуйста составить программу. 1.Составьте программу, которая удаляет в строке s все точки. 2.Составьте программу, которая заменяет в строке s буквы "о" на буквы "и", а буквы "и"- на буквы "о".

Есть ответ
17.12.2022
379

Ответ


Первая

var s:string; i:integer;beginreadln(s);for i:=1 to length(s) doif s[i]='.' then Delete(s,i,1);writeln(s);readln;end.

И вторая

var s:string; i:integer;beginreadln(s);for i:=1 to length(s) doif s[i]='о' then s[i]:='и' else if s[i]='и' then s[i]:='о';writeln(s);readln;end.

 

 

 

 

 

 

 


Если вы нашли правильное решение, вы можете поблагодарить нас начиная с 10 рублей.
Просто нажмите на кнопку "Подарить".
17.12.2022
Этот сайт использует cookies (Политика Cookies). Вы можете указать условия хранения и доступ к cookies в своем браузере.