Помогите решить ** С++ и Pascal или в чем то одном) Задача Характеристики генома. Даю 20...

Question

Помогите решить на С++ и Pascal или в чем то одном) Задача Характеристики генома. Даю 20 баллов!

---

Answer 1

#include // header input/output streams

#include

using std::string;

#include

using std::map;

using std::cin; // для работы cin

using std::cout; // для работы cout

using std::endl; // для работы перевода на новую строку endl

int main(){

unsigned int n;

 cin >> n;

 string st;

 cin >> st;

 map a;

 for (auto i = st.begin(); i

     try{

       a[*i]++;

     }

     catch(std::exception&e){

       a.insert(std::make_pair(*i,1));

     }

   }

for (auto i = a.begin(); i!=a.end();++i){

   cout << i->first  << ' ' <<  i->second

   }

}