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

@cyb · Регистрация: 23.05.2011

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

даны натуральное число n,символы s1,...,sn.подсчитать сколько раз среди данных символов встречается символ + и сколько раз символ *

@azzaq · 23.05.2011, 20:39

Pascal

p := 0;
r := 0;
for i := 1 to n do
  begin
     read(s);     
     if s='+' then inc(p);
     if s='*' then inc(r);
  end;
writeln('Число (+) - ',p);
writeln('Число (*) - ', r);
readln;

@Brotherhood6 · 23.05.2011, 20:40

Pascal

var a:array[1..255] of string;
i,n,plus,mul:integer;
begin
write(' n ? : ');readln(n);
for i:=1 to n do begin read(a[i]);
if a[i]='+' then plus:=plus+1;
if a[i]='*' then mul:=mul+1;  end;
writeln(plus,' ' ,mul);
end.

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

Решение

Решение

@cyb 0 / 0 / 0 Регистрация: 23.05.2011 Сообщений: 10
		1
	Подсчитать, сколько раз среди заданных символов встречается символ + 23.05.2011, 20:22. Показов 1651. Ответов 2 Метки нет (Все метки) даны натуральное число n,символы s1,...,sn.подсчитать сколько раз среди данных символов встречается символ + и сколько раз символ * 0

	23.05.2011, 20:40

Опции темы