Форум программистов, компьютерный форум CyberForum.ru

Паскаль/С++ - C++

Восстановить пароль Регистрация
 
Kostia1012
1 / 1 / 0
Регистрация: 17.11.2013
Сообщений: 96
22.12.2013, 14:36     Паскаль/С++ #1
Привет всем, помогите, пожалуйста...
Нужно перевести код программы из паскаля в с++
код:
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
 repeat
    Write('Введите строку (пустая строка - конец программы): ');
    Readln(s);
    if s<>'' then begin
       for i:=1 to (Length(s) div 2)  do begin
         ch := s[i];
         s[i] := s[ Length(s)+1-i ];
         s[ Length(s)+1-i ] := ch;
      end;
      WriteLn('Перевёрнутая строка: ', s);
   end;
  until s='';
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
22.12.2013, 14:36     Паскаль/С++
Посмотрите здесь:

C++ из Паскаль в С++
из Паскаль в С++ C++
Паскаль и С++ C++
C++ перевести с С на паскаль
C++ Транслятор с С в Паскаль
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
taras atavin
Ушёл с форума.
 Аватар для taras atavin
3569 / 1752 / 91
Регистрация: 24.11.2009
Сообщений: 27,619
22.12.2013, 14:45     Паскаль/С++ #2
C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
do
{
 std::cout<<"Введите строку (пустая строка - конец программы): "<<std::endl;
 std::cin>>s; std::cout<<std:;endl;
 if (!s.empty())
 {
  for (i=1; i<= s.len()/2; ++i)
  {
   ch=s[i];
   s[i]=s[s.len()+1-i];
   s[s.len()+1-i]=ch;
  }
  std::cout<<"Перевёрнутая строка: "<<s<<std::endl;
 }
} while (!s.empty());
Kostia1012
1 / 1 / 0
Регистрация: 17.11.2013
Сообщений: 96
22.12.2013, 15:22  [ТС]     Паскаль/С++ #3
Цитата Сообщение от taras atavin Посмотреть сообщение
C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
do
{
 std::cout<<"Введите строку (пустая строка - конец программы): "<<std::endl;
 std::cin>>s; std::cout<<std:;endl;
 if (!s.empty())
 {
  for (i=1; i<= s.len()/2; ++i)
  {
   ch=s[i];
   s[i]=s[s.len()+1-i];
   s[s.len()+1-i]=ch;
  }
  std::cout<<"Перевёрнутая строка: "<<s<<std::endl;
 }
} while (!s.empty());
А можете дописать все, что нужно, чтобы это был рабочий код?..
taras atavin
Ушёл с форума.
 Аватар для taras atavin
3569 / 1752 / 91
Регистрация: 24.11.2009
Сообщений: 27,619
22.12.2013, 15:26     Паскаль/С++ #4
А исходный рабочий? Я перевёл фрагмент, разумеется и получился фрагмент.
Kostia1012
1 / 1 / 0
Регистрация: 17.11.2013
Сообщений: 96
22.12.2013, 15:45  [ТС]     Паскаль/С++ #5
Цитата Сообщение от taras atavin Посмотреть сообщение
А исходный рабочий? Я перевёл фрагмент, разумеется и получился фрагмент.
Помогите, пожалуйста, сделайте из фрагмента рабочий код...
taras atavin
Ушёл с форума.
 Аватар для taras atavin
3569 / 1752 / 91
Регистрация: 24.11.2009
Сообщений: 27,619
22.12.2013, 15:49     Паскаль/С++ #6
Так не пойдёт. Если нужен полный текст, то или давай полный же исходник, или ставь задачу на разработку с ноля, тогда будет перевод уже с русского на плюсы.
rangerx
1908 / 1517 / 139
Регистрация: 31.05.2009
Сообщений: 2,876
23.12.2013, 01:17     Паскаль/С++ #7
C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
#include <cstring>
#include <iostream>
 
using namespace std;
 
int main() {       
  char t;
  int i, j, sn;
  char s[256];  
  
  do {
    cout << "Введите строку (пустая строка - конец программы): "; 
    cin.getline(s, sizeof(s));  
    sn = strlen(s);
    if(sn != 0) {      
      i = 0; j = sn - 1;
      while(i < j) {
        t = s[i]; s[i] = s[j]; s[j] = t;
        ++i; --j;
      }      
      cout << s << endl;
    }    
  } while(sn != 0);  
}
Kostia1012
1 / 1 / 0
Регистрация: 17.11.2013
Сообщений: 96
23.12.2013, 19:44  [ТС]     Паскаль/С++ #8
Цитата Сообщение от rangerx Посмотреть сообщение
C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
#include <cstring>
#include <iostream>
 
using namespace std;
 
int main() {       
  char t;
  int i, j, sn;
  char s[256];  
  
  do {
    cout << "Введите строку (пустая строка - конец программы): "; 
    cin.getline(s, sizeof(s));  
    sn = strlen(s);
    if(sn != 0) {      
      i = 0; j = sn - 1;
      while(i < j) {
        t = s[i]; s[i] = s[j]; s[j] = t;
        ++i; --j;
      }      
      cout << s << endl;
    }    
  } while(sn != 0);  
}
Благодарю! Рас шифруйте, пожалуйста, подробно что значит эта строка
C++
1
    cin.getline(s, sizeof(s));
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
23.12.2013, 22:42     Паскаль/С++
Еще ссылки по теме:

C++ С++ переделать в паскаль
Паскаль C++
C++ перевести с Паскаль

Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
rangerx
1908 / 1517 / 139
Регистрация: 31.05.2009
Сообщений: 2,876
23.12.2013, 22:42     Паскаль/С++ #9
Цитата Сообщение от Kostia1012 Посмотреть сообщение
Рас шифруйте, пожалуйста, подробно что значит эта строка
sizeof - применительно к символьному(char) массиву возвращает его размер. Насчёт cin.getline см. ссылку
http://www.cplusplus.com/reference/i...tream/getline/
Yandex
Объявления
23.12.2013, 22:42     Паскаль/С++
Ответ Создать тему
Опции темы

Текущее время: 00:24. Часовой пояс GMT +3.
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2016, vBulletin Solutions, Inc.
Рейтинг@Mail.ru