Подсчитать, сколько раз среди заданных символов встречается символ +

@Ирина Анатольев · Регистрация: 02.12.2011

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

Помогите пожалуйста с решением задачи: Дано натуральное число n и символы s1, s2, …, sn. Подсчитать сколько раз среди данных символов встречается символ +.

@Puporev · 02.12.2011, 09:33

Pascal

uses crt;
const nmax=100;
var s:array[1..nmax] of char;
    n,i,k:integer;
begin
clrscr;
repeat
write('Количество символов до ',nmax,' n=');
readln(n);
until n in [1..nmax];
writeln('Введите ',n,' символов в строку:');
k:=0;
for i:=1 to n do
 begin
  s[i]:=readkey;{читаем код символа}
  write(s[i]);{выводим}
  if s[i]='+' then k:=k+1;{если +, считаем}
  if i=n then writeln;{все ввели, перевод на новую строку}
 end;
writeln;
write('Количество символов + = ',k);
readln
end.

@Ирина Анатольев 0 / 0 / 0 Регистрация: 02.12.2011 Сообщений: 6
		1
	Подсчитать, сколько раз среди заданных символов встречается символ + 02.12.2011, 09:22. Показов 1382. Ответов 1 Метки нет (Все метки) Помогите пожалуйста с решением задачи: Дано натуральное число n и символы s1, s2, …, sn. Подсчитать сколько раз среди данных символов встречается символ +. 0

	02.12.2011, 09:33

Опции темы

Подсчитать, сколько раз среди заданных символов встречается символ +

Решение