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

самый простой вопрос который мог задать нуб!не получается подсчет слов!!!!! - C++

Войти
Регистрация
Восстановить пароль
Другие темы раздела
C++ Найти ошибку в исходнику http://www.cyberforum.ru/cpp-beginners/thread72969.html
помогите найти ошибку #include<iostream> using namespace std; template <typename T> class List {
C++ Найти все натуральные числа... Найти все натуральные числа, не превосходящие заданного числа N, десятичное представление которых строго возрастающая последовательность цифр. http://www.cyberforum.ru/cpp-beginners/thread72954.html
C++ Задание 2мерных массивов
Простите за тупой вопрос:как правильно задать двумерный массив
НЕ всё так просто C++
Привет всем, не могли бы Вы мне помочь решить одну задачку, с ней не всё так просто, как кажется на первый взгляд, я с ней морочу голову довольно долго, пока я написал вот такую штуку #include<iostream> #include<cmath> using namespace std; int main () { float r = exp(200*log(2)); printf("2 v 200 stepeni ravno %f\n", r); system("Pause");
C++ Выбрать 3 точки множества, составляющих треугольник наибольшего периметра http://www.cyberforum.ru/cpp-beginners/thread72937.html
Выбрать 3 различные точки заданного на плоскости множества точек,составляющих треугольник наибольшего периметра.Помогите пож-та написать программку,очень нужно:)заранее большое спасибо
C++ Трехмерном пространстве В множестве А1 в трехмерном пространстве найти пару точек с максимальным расстоянием между ними(использовать структуру) подробнее

Показать сообщение отдельно
Sayrus89
31 / 31 / 1
Регистрация: 26.10.2009
Сообщений: 98
10.12.2009, 22:16     самый простой вопрос который мог задать нуб!не получается подсчет слов!!!!!
Пожалуйста

Кстати, так врядли получится подсчитать количество слов в строке.
Вот, например, листинг программы на паскале, подсчитывающей кол-о слов между первыми двумя запятыми :

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
uses crt;
 
type TDelimiter = set of Char;
 
var
inText,             {исходный текст}
tmpString : string;     {временная строка}
first,              {позиция первой запятой}
second,             {позиция второй запятой}
TextLength,             {длина текста}
i, 
NumOfWords : integer;       {счетчик слов}
delimiters : TDelimiter;    {разделители}
 
 
begin
clrscr; {очищяем экран}
 
{в переменной delimiters должны храниться символы,
 которые нужно считать разделителями слов}
delimiters := ['.', ':', '!', '?', ';', '(', ')'];
 
NumOfWords := 0;
 
Writeln('***Введите текст:');
Readln(inText);         {считываем текст с клавиатуры}
Writeln('');
 
TextLength := Length(inText);
first := Pos(',', inText);  {находим позиция первой запятой}
if first=0 then         {если запятая не найдена}
   begin
   Writeln('В тексте нет ни одной запятой');
   Writeln('Нажмите клавишу для выхода');
   readkey;
   exit;
   end;
 
{копируем во временную строку часть исходного текста,
 начиная с позиции, стоящей после первой запятой}
tmpString := Copy(inText, first + 1, TextLength - first);
second := Pos(',', tmpString);  {ищем вторую во временной строке вторую запятую}
if second=0 then        {если вторая запятая не найдена}
   begin
   writeln('Вторая запятая не найдена');
   Writeln('Нажмите клавишу для выхода');
   readkey;
   exit;
   end;
 
TextLength := Length(tmpString);
Delete(tmpString, second, TextLength - second + 1);     {обрезаем строку, оставляя только часть,}
                            {находящуюся между запятыми}
 
TextLength := Length(tmpString);            {запоминаем длину текста}
if TextLength=0 then                    {если строка получилась пустая}
   begin
   Writeln('Между запятыми нет текста');
   Writeln('Нажмите клавишу для выхода');
   Readkey;
   exit;
   end;
 
{заменяем все разделители пробелами}
{Это делаем для того, чтобы перед и после слов стояли только пробелы
 и легче можно было бы определить слово, чтобы посчитать их количество }
for i:=1 to TextLength do
    begin
       if tmpString[i] in delimiters then tmpString[i]:=' ';
    end;
 
{подсчитываем количество слов}
{Если i-ый символ пробел, а (i+1)-ый не разделитель и не пробел,
 то увеличиваем счетчик слов на еденицу}
for i:=1 to TextLength do
    begin
       if (tmpString[i]=' ')
          AND NOT(tmpString[i+1]=' ') then inc(NumOfWords);
    end;
 
if NOT(tmpString[1]=' ') then inc(NumOfWords); {если первый символ в строке не пробел, увеличиваем счетчик}
Writeln('***Часть строки, в которой определяем количество слов:');
Writeln(tmpString);
Writeln('');
Writeln('***Количество слов иежду первой и второй запятыми: ',NumOfWords);
readkey;
end.
Добавлено через 1 минуту
В Unreal играл когда-то (и мне очень, кстати, нравилось ) но не через интернет
 
Текущее время: 10:04. Часовой пояс GMT +3.
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2017, vBulletin Solutions, Inc.
Рейтинг@Mail.ru