Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 23.04.2010, 22:30   #1
zasqzasq
 
Регистрация: 03.01.2010
Сообщений: 9
Восклицание Последовательность

Дано последовательность чисел (А, А+1, А+2,...,Б-1,Б) и дано число В.
Найти сколько раз В повторяется в последовательности.
Например:
Входные данные:
2220 2223
222
Выходные:
5

([222]0,[222]1,[222]2,2[222],[222]3)
MoRZe
zasqzasq вне форума Ответить с цитированием
Старый 23.04.2010, 22:33   #2
mifomen
Help, если смогу!
Пользователь
 
Регистрация: 14.09.2009
Сообщений: 55
По умолчанию

Цитата:
Сообщение от zasqzasq Посмотреть сообщение
([222]0,[222]1,[222]2,2[222],[222]3)
Ты уверен?
Я помог =Нажми, НА ВЕСЫ.
Почему форум не поддерживает spoiler & spoiler2 ?
Если я вам помог, не будьте скупым R409586472993
mifomen вне форума Ответить с цитированием
Старый 23.04.2010, 23:02   #3
zasqzasq
 
Регистрация: 03.01.2010
Сообщений: 9
По умолчанию

Да, я уверен. в 2222 два раза используется 222 (раз первых три и раз последних три)
MoRZe
zasqzasq вне форума Ответить с цитированием
Старый 24.04.2010, 07:36   #4
evg_m
Старожил
 
Регистрация: 20.04.2008
Сообщений: 5,526
По умолчанию

Код:
function FINDcount(const B, S: string) integer; // сколко раз строка B ('222') в строке S('2222')
var
  k: integer;
begin
  result:=0;
  k:=posex(B,S,k+1);
  while k>0 do
  begin
    result:=resul+1;
    k:=posEx(B,S,k+1);
  end;
end;
осталось применить эту функцию ко всем числам из диапазона
программа — запись алгоритма на языке понятном транслятору
evg_m вне форума Ответить с цитированием
Старый 24.04.2010, 09:22   #5
mifomen
Help, если смогу!
Пользователь
 
Регистрация: 14.09.2009
Сообщений: 55
По умолчанию

evg_m, это конечно всё просто замечательно, но надо сделать для последовательностей, а не для строк
Я помог =Нажми, НА ВЕСЫ.
Почему форум не поддерживает spoiler & spoiler2 ?
Если я вам помог, не будьте скупым R409586472993
mifomen вне форума Ответить с цитированием
Старый 24.04.2010, 15:18   #6
Филантроп
Форумчанин
 
Аватар для Филантроп
 
Регистрация: 12.04.2010
Сообщений: 134
По умолчанию

Код:
но надо сделать для последовательностей, а не для строк
А в чем сложность то
Код:
k:=0;
str(C,s1);
for i:=A to B do
begin
str(i,s);
k:=k+FINDcount(s1,s);
end;
writeln(k);
кому нужна помощь! жду в аське и скайпе!
Филантроп вне форума Ответить с цитированием
Старый 24.04.2010, 17:22   #7
LeBron
Форумчанин
 
Регистрация: 10.10.2009
Сообщений: 680
По умолчанию

Народ, не партесь, задача с украино-польского контеста, последнее время сдачи было вчера в час ночи, так что... А решение довольно неприятное в плане реализации, можно или перебор поразрядкой+бинарку, или еще что-то в этом роде.
Лобовик набирал 2 балла с 10.
LeBron вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
С++. Последовательность чисел Medik07 Помощь студентам 2 23.12.2011 20:54
Последовательность СержПф Помощь студентам 0 23.04.2010 13:37
последовательность zhenya.ya Помощь студентам 1 14.03.2010 22:48
Последовательность CrazyRabbit Помощь студентам 14 08.02.2009 17:22
последовательность pakusya Помощь студентам 1 17.10.2008 17:33