Пожалуйста помогите с задачкой на строки - Паскаль, Turbo Pascal, PascalABC.NET

kiko · 27.11.2008, 18:23

Дана строка. Подсчитать сколько в ней вхождений заданной с клавиатуры буквы...

помогите пожалуйста!

alex_fcsm · 27.11.2008, 18:28

Код:

var s:string;
    ch:char;
    i,n:integer;

begin
writeln('Input string');
readln(s);
writeln('Input letter');
readln(ch);
n:=0;
for i:=1 to length(s) do
 if ch=s[i] then inc(n);

writeln(n);
end.

kiko · 27.11.2008, 18:52

alex_fcsm огромное спасибо!
alex_fcsm можешь помочь с задачкой, я тему создавал ... там про базу данных
http://programmersforum.ru/showthread.php?t=30935
пожалуйста помоги

alex_fcsm · 27.11.2008, 18:58

Вы хоть бы раз оценили сообщения...
Щас посмотрю

27.11.2008, 18:23	#1
kiko Пользователь Регистрация: 19.11.2008 Сообщений: 24	Пожалуйста помогите с задачкой на строки Дана строка. Подсчитать сколько в ней вхождений заданной с клавиатуры буквы... помогите пожалуйста! нет ничего не возможного ...

27.11.2008, 18:28	#2
alex_fcsm Участник клуба Регистрация: 10.11.2008 Сообщений: 1,502	Код: `var s:string; ch:char; i,n:integer; begin writeln('Input string'); readln(s); writeln('Input letter'); readln(ch); n:=0; for i:=1 to length(s) do if ch=s[i] then inc(n); writeln(n); end.` Нормальное состояние техники - нерабочее, все остальное частный случай.

27.11.2008, 18:52	#3
kiko Пользователь Регистрация: 19.11.2008 Сообщений: 24	alex_fcsm огромное спасибо! alex_fcsm можешь помочь с задачкой, я тему создавал ... там про базу данных http://programmersforum.ru/showthread.php?t=30935 пожалуйста помоги нет ничего не возможного ...

27.11.2008, 18:58	#4
alex_fcsm Участник клуба Регистрация: 10.11.2008 Сообщений: 1,502	Вы хоть бы раз оценили сообщения... Щас посмотрю Нормальное состояние техники - нерабочее, все остальное частный случай.

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Строки. Помогите, пожалуйста.	Dexterello	Помощь студентам	18	14.07.2008 01:43
Помогите с задачкой, пожалуйста!	korteas	Помощь студентам	6	09.10.2007 12:10
Помогите пожалуйста с задачкой	Antowka	Помощь студентам	1	13.06.2007 13:41