Определить количество слов в строке, оканчивающихся на заданный символ

@mixa00734 · Регистрация: 17.06.2015

Author24 — интернет-сервис помощи студентам

Прошу помощи.
Дана символьная строка и символ. Слово - последовательность символов между пробелами, не содержащая пробелы внутри
себя. Определить количество слов в строке, оканчивающихся на заданный символ.

@SW Developer · 29.05.2016, 23:28

Pascal

const space=' ';
var s    : string;
    ch   : char;
    i, j : byte;
    
BEGIN
     WriteLn('Введите строку:');
     ReadLn(s);
     Insert(space, s, length(s)+1);
     WriteLn('Введите символ:');
     ReadLn(ch);
     j:= 0;
     for i:= 1 to Length(s) do
         if ((s[i]=ch) and (s[i+1]=space)) then Inc(j);
     WriteLn(j);
END.

@mixa00734 · 29.05.2016, 23:58 **[ТС]**

Тема закрыта! Спасибо за помощь

@mixa00734 0 / 0 / 0 Регистрация: 17.06.2015 Сообщений: 13
		1
	Определить количество слов в строке, оканчивающихся на заданный символ 29.05.2016, 21:01. Показов 3036. Ответов 2 Метки нет (Все метки) Прошу помощи. Дана символьная строка и символ. Слово - последовательность символов между пробелами, не содержащая пробелы внутри себя. Определить количество слов в строке, оканчивающихся на заданный символ. 0

@mixa00734 0 / 0 / 0 Регистрация: 17.06.2015 Сообщений: 13
	29.05.2016, 23:58 [ТС]	3
	Тема закрыта! Спасибо за помощь 0

Определить количество слов в строке, оканчивающихся на заданный символ

Решение