Предмет: Информатика, автор: Kapakopum

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

Ответы

Автор ответа: And42
42
PascalABC.Net

var
  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.

And42: Пожалуйста =)
Похожие вопросы
Предмет: Английский язык, автор: никита3365
Предмет: Химия, автор: lenchik200122