Задать вопрос Регистрация
Помочь другим

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

Ответы 1

  • Первая

    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.

     

     

     

     

     

     

     

  • Добавить свой ответ

Еще вопросы

Топ пользователей

Войти через Google

 или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years