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

С++ для начинающих

Войти
Регистрация
Восстановить пароль
 
ololoIII
Сообщений: n/a
#1

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

09.03.2014, 16:58. Просмотров 263. Ответов 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++
Помогите, пожалуйста перевести в с++ uses crt; const nmax=20; var a:array of integer; n,m,i,j,k:byte; s,x:integer; ...

Перевести код с Паскаля на С++ - C++
Program proga; uses crt; Type gostinica= record FIO:string; nomer:integer; cena:integer; kolvo:integer; itogo: integer; ...

Перевести код с Паскаля на С++ - C++
Фирме принадлежат два магазина. Известна стоимость товаров, проданных в каждом магазине за каждый день в июле и августе, которая хранится в...

Перевести код из Паскаля в Си++ - C++
Переведите пожалуйста из Паскаля в Си++, кому не сложно.

Перевести код с паскаля на C++ - C++
По заданному натуральному числу N необходимо вычислить количество натуральных чисел, которые являются делителями N! (факториала числа N). ...

1
kasan
Чорумфанин
337 / 337 / 185
Регистрация: 06.03.2014
Сообщений: 881
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;
}
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
10.03.2014, 13:00
Привет! Вот еще темы с ответами:

Перевести код паскаля в с++ - C++
Нужно перевести данный код паскаля в с++. Задание: Найти в строке все заданные последовательности символов и заменить их другой...

Перевести код программы Паскаля в код С++ - C++
В массиве Х (15) найти произведение и количество элементов расположенных между наибольшими и наименьшими элементами кто может перевести...

Перевести код из Паскаля в С или С++ - C++
Срочно нужно перевести код, очень нужно.... program Text13; var F_in,F_out: Text; Name,line: string; begin Write('File...

Необходимо перевести код с паскаля на С++ - C++
const n=5; var a: array of integer; i,j,sum: integer; begin randomize; writeln('Матрица:'); for i:=1 to n do ...


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

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2017, vBulletin Solutions, Inc.
Рейтинг@Mail.ru