Перевод с pascal на c++

@salaikus · Регистрация: 08.12.2013

Author24 — интернет-сервис помощи студентам

привет всем , помогите ПОЖАЛУЙСТА перевести с pascal на c++.
пытался перевести, но с++ сложноват , на изучение языка времени катастрофически не хватает, еще до конца с pascal не закончил.
программа на pascal:

Кликните здесь для просмотра всего текста

Pascal

 var
 i,kolzagl,kolmal,j:integer; // kolzagl,kolmal - количество заглавных и маленьких букв
 s,s1:string;
begin
 writeln('Vvedite text:');
 readln(s);
kolzagl:=0;kolmal:=0;
 for i:=length(s) downto 1 do
  begin
   if  s[i] in ['A'..'Z','А'..'Я','Ё'] then kolzagl:=kolzagl+1;
   if  s[i] in ['a'..'z','а'..'я','ё'] then  kolmal:=kolmal+1;
  end;
 writeln('kol.propisnih:   ',kolzagl,'        kol.strochnih:   ',kolmal);
 
 
 if (kolmal<kolzagl)then
  begin
    for i:=length(s) downto 1 do //идем с конца строки
      begin
           if   s[i] in ['A'..'Z','А'..'Я','Ё'] then
         begin
          s1:=s1+'('+ inttostr(kolzagl)+')'; //формируем строку состоящую из скобок и номера прописной буквы,причем номером
          //считается ее номер как прописной буквы
          insert(s1,s,i+1); //вставляем  эту строку с номером буквы после самой буквы
          delete(s1,1,length(s));
          kolzagl:=kolzagl-1;//следующий номер строчной буквы будет на 1 меньше ( меньше,потому что идем с конца строки)
         end;
      end;
  end
 
 else
 for i:=length(s) downto 1 do
  begin
   if  s[i] in ['A'..'Z','А'..'Я','Ё'] then  
    begin
     j:=ord(s[i])+32; //прибавляем к коду символа 32 ,чтобы сделать букву строчной
      delete(s,i,1);    
     insert(chr(j),s,i); //вставляем ту же букву,только маленькую
    end;
      end;
 
 writeln(s);
 
end.

Текст задания: Дан текст.Определить (строчных или прописных) букв в нем больше, и преобразовать следующим образом ;если больше прописных чем строчных, то после каждой прописной буквы записать её номер в скобочках; в противном случае все буквы преобразовать в строчные.

@rangerx · 14.01.2014, 23:22

Сообщение от salaikus

Дан текст.Определить (строчных или прописных) букв в нем больше, и преобразовать следующим образом ;если больше прописных чем строчных, то после каждой прописной буквы записать её номер в скобочках; в противном случае все буквы преобразовать в строчные.

C++

#include <cctype>
#include <string>
#include <sstream>
#include <iostream>
 
struct Letter_count {
  int uppercase_letter;
  int lowercase_letter;
};
 
Letter_count count_letters(const std::string& s) {
  using namespace std;
  
  //--------------------------------
  typedef string::size_type index_t;  
  //--------------------------------
    
  Letter_count lc = {0, 0};
  
  for(index_t i = 0; i < s.length(); ++i) {
    if(isupper(s[i]))
      ++lc.uppercase_letter;
    else if(islower(s[i]))
      ++lc.lowercase_letter;
  }
  
  return lc;
}
 
void transform_string(std::string& s) {  
  using namespace std;
  
  //--------------------------------
  typedef string::size_type index_t;
  //--------------------------------
    
  Letter_count lc = count_letters(s);  
  
  if(lc.uppercase_letter > lc.lowercase_letter) {    
    index_t seq_num = 0;
    ostringstream stream;
    for(index_t i = 0; i < s.length(); ++i) {      
      if(isupper(s[i])) {
        ++seq_num;  
        stream.str("");
        stream << '(' << seq_num << ')';        
        s.insert(i + 1, stream.str());
      }      
    }    
  }
  else {
    for(index_t i = 0; i < s.length(); ++i)
      s[i] = tolower(s[i]);
  }    
}
 
int main() {  
  std::string s;
  std::getline(std::cin, s);  
  transform_string(s);
  std::cout << s << std::endl;
}

	14.01.2014, 23:22

Перевод с pascal на c++

Решение