Определить число вхождений буквы ''p'' в первые три слова текста

@Narim · Регистрация: 18.10.2010

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

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

@Narim · 14.11.2010, 11:41 **[ТС]**

привет. не могу решить задачу. напишите плиз решение, начало есть а дальше не понимаю, спасибо
Дан текст определить число вхождений буквы "р" в первые три слова текста.

program t;
uses crt;
const n=10;
var
a:array [1..n] of string;
s:string;
i,k:integer;

begin

for i:=1 to 3 do
if a[i]:=" " then
k:=pos(s,"p");

@Narim 0 / 0 / 0 Регистрация: 18.10.2010 Сообщений: 13
		1
	Определить число вхождений буквы ''p'' в первые три слова текста 13.11.2010, 12:09. Показов 1587. Ответов 1 Метки нет (Все метки) всем привет, не получается решить задачу на паскале по строковым переменным. ни как не могу понять, решите плиз. в заранее благодарю! задачу надо сделать с помощью строк символов. вот условие Дан текст. Определитьчисло вхождений буквы ''p'' в первые три слова текста. 0

@Narim 0 / 0 / 0 Регистрация: 18.10.2010 Сообщений: 13
	14.11.2010, 11:41 [ТС]	2
	привет. не могу решить задачу. напишите плиз решение, начало есть а дальше не понимаю, спасибо Дан текст определить число вхождений буквы "р" в первые три слова текста. program t; uses crt; const n=10; var a:array [1..n] of string; s:string; i,k:integer; begin for i:=1 to 3 do if a[i]:=" " then k:=pos(s,"p"); 0