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

перевести небольшой код с паскаля на с - C++

Восстановить пароль Регистрация
 
ololoIII
Сообщений: n/a
09.03.2014, 16:58     перевести небольшой код с паскаля на с #1
помогите плз перевести небольшой код с pascal на С++
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
Program String41;
var
Dano:string; // вводимая строка 
slova:integer; // счетчик слов 
i:integer; // счетчик в цикле 
begin
// ввод данных 
Write('Введите строку:');
readln(Dano);
// решение 
slova:=0; //начальное значение счетчика 
// цикл по символам строки 
for i:=1 to length(Dano) do
begin
// если нашли конец слова накручисваем счетчик слов 
if (Dano[i]=' ')and(Dano[i-1]<>' ') then inc(slova);
end;
inc(slova); // учет последнего слова 
// вывод результата 
Writeln('Количество слов в строке. =',Slova);
end.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
09.03.2014, 16:58     перевести небольшой код с паскаля на с
Посмотрите здесь:

C++ Перевод небольшой программки с Паскаля на С++
C++ Перевести код с Паскаля на С++
C++ Перевести код паскаля в с++
Перевести код программы Паскаля в код С++ C++
C++ Перевести код с паскаля на C++
C++ Перевести код из Паскаля в С++
C++ Перевести код с Паскаля на С++
Необходимо перевести код с паскаля на С++ C++

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

Или воспользуйтесь поиском по форуму:
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
kasan
Чорумфанин
337 / 337 / 185
Регистрация: 06.03.2014
Сообщений: 872
10.03.2014, 13:00     перевести небольшой код с паскаля на с #2
C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
#include <iostream>
 
using namespace std;
int main()
{
  std::string dano;
  int slova,i;
  cout<<"Enter string: ";
  getline(cin,dano);
  slova=0;
for (i=1;i<dano.length();i++)
{
    if((dano.at(i)==' ')&&(dano.at(i-1)!=' '))
            slova++;
}
slova++;
cout<<"Count of words: "<<slova<<endl;
return 0;
}
Yandex
Объявления
10.03.2014, 13:00     перевести небольшой код с паскаля на с
Ответ Создать тему
Опции темы

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