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

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

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

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

09.03.2014, 16:58. Просмотров 253. Ответов 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++
По заданному натуральному числу N необходимо вычислить количество натуральных чисел, которые являются делителями N! (факториала числа N). ...

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

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

Перевести код из Паскаля в С++ - C++
Помогите, пожалуйста перевести в с++ uses crt; const nmax=20; var a:array of integer; n,m,i,j,k:byte; s,x:integer; ...

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

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

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

Как можно перевести этот код с паскаля в с++? - C++
program razbienie_mnozhestwa(input,output); var i,j,k,n:byte;wper:arrayof boolean; sled,pred,blok:arrayof byte; procedure...

Перевод небольшой программки с Паскаля на С++ - C++
У меня не сильно складываются отношения с Паскалем))) Нужно перевести программку на С++. Помогите, пожалуйста, буду очень признателен....

перевести из паскаля в с++ - C++
program spektr; uses crt; type vect=arrayof integer; var f,g:vect; j,i,n:integer; BEGIN clrscr; write('n=');...


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

Или воспользуйтесь поиском по форуму:
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
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;
}
Yandex
Объявления
10.03.2014, 13:00     перевести небольшой код с паскаля на с
Ответ Создать тему
Опции темы

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