• ПОЖАЛУЙСТА ПОМОГИТЕ, КОМУ НЕТРУДНО!!! СТАВЛЮ МНОГО БАЛЛОВ!!
    Напишите программу, которая во введённой символьной строке заменяет все буквы а на буквы б и наоборот. Заглавные на заглавные, строчные на строчные.

Ответы 3

  • спасибо, работает :)
  • Пожалуйста =)
  • PascalABC.Netvar  str : string;  i : integer;begin  write('Введите строку: ');  readln(str);    for i := 1 to length(str) do    case str[i] of      'а' : str[i] := 'б';      'А' : str[i] := 'Б';      'б' : str[i] := 'а';      'Б' : str[i] := 'А';    end;    writeln(str);  end.
    • Автор:

      núñez76
    • 6 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

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

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

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