Подсчитать какое количество символов используется в введенной строке, используя множества

@Tieff · Регистрация: 17.11.2014

Подсчитать какое количество символов (не длину рядка) исполюзуется в вводном рядке, используя множества.

@Puporev · 29.01.2015, 17:39

Pascal

k:=0;
m:=[];
for i:=1 to length(s) do
if not(s[i] in m) then
 begin
  inc(k);
  m:=m+[s[i]];
 end;

@Tieff 0 / 0 / 0 Регистрация: 17.11.2014 Сообщений: 30
		1
	Подсчитать какое количество символов используется в введенной строке, используя множества 29.01.2015, 17:35. Показов 1483. Ответов 1 Метки нет (Все метки) Подсчитать какое количество символов (не длину рядка) исполюзуется в вводном рядке, используя множества. 0

Опции темы

Решение