Во введенной строке подсчитать количество восклицательных знаков

@Kutta · Регистрация: 15.04.2015

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

@ZX Spectrum-128 · 29.04.2015, 21:13

Сообщение от Kutta

Дополните предыдущую программу

Какую предыдущую?

во введенной строке сначало подсчитывалось количество восклицательных знаков.

Pascal

k:=0;
for i:=1 to length(s) do
 if s[i]='!' then 
  inc(k);

@Kutta 0 / 0 / 0 Регистрация: 15.04.2015 Сообщений: 10
		1
	Во введенной строке подсчитать количество восклицательных знаков 28.04.2015, 15:49. Показов 2832. Ответов 1 Метки нет (Все метки) Дополните предыдущую программу таким образом, чтобы во введенной строке сначало подсчитывалось количество восклицательных знаков. 0

	29.04.2015, 21:13

Решение