Навигация

Поиск по сайту

Последние новости

Новое в блогах

Родители - За безопасность детей!
Администрация, педагог
Начало
Лихоманенко Николай Иванович, педагог
Лето с футбольным мячом!
Печалёва Елена Борисовна, педагог
Дружно отдыхаем, дружно пищу поглощаем!
Печалёва Елена Борисовна, педагог
Открытие лагеря "Солнышко"
Печалёва Елена Борисовна, педагог

10 класс. П.66 Задача С. Символьные строки

 Учебник. К.Ю Поляков, Е.А. Ерёмин. Информатика. 10 класс. Углублённый уровень. §66 Символьные строки


Задача C. Замена a-b и наоборот

    Напишите программу, которая заменяет в символьной строке все буквы на буквы , буквы на буквы , буквы на буквы и буквы на буквы .

PASCAL

program p66C;

var s:string;

    i,k,l:longint;

begin

  readln(s);

  l:=length(s);

  k:=0;

  for i:=1 to l do

    case s[i] of

      'a': begin s[i]:='b'; k:=k+1; end;
      'A': begin s[i]:='B'; k:=k+1; end;
      'b': begin s[i]:='a'; k:=k+1; end;
      'B': begin s[i]:='A'; k:=k+1; end;

    end;

  writeln(s);
  writeln(k);

end. 

C++

#include
#include

using namespace std;

int main()

{

    string s;

    ifstream fin("input.txt");
    ofstream fout("output.txt");

    fin >> s;

    fin.close();

    unsigned int i,k=0;

    for (i=0;i

       switch (s[i])

       {

       case 'a': k++; s[i]='b'; break;
       case 'b': k++; s[i]='a'; break;
       case 'A': k++; s[i]='B'; break;
       case 'B': k++; s[i]='A'; break;

       }

    fout << s << endl << k;

    fout.close();

    return 0;

}