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

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

Вернуться   Форум программистов > Delphi программирование > Паскаль, Turbo Pascal, PascalABC.NET
Регистрация

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

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

Закрытая тема
Ваша тема закрыта, почему это могло произойти? Возможно,
Нет наработок или кода, если нужно готовое решение - создайте тему в разделе Фриланс и оплатите работу.
Название темы включает слова - "Помогите", "Нужна помощь", "Срочно", "Пожалуйста".
Название темы слишком короткое или не отражает сути вашего вопроса.
Тема исчерпала себя, помните, один вопрос - одна тема
Прочитайте правила и заново правильно создайте тему.
 
Опции темы Поиск в этой теме
Старый 21.12.2010, 13:57   #1
Болванка
 
Регистрация: 07.11.2010
Сообщений: 3
По умолчанию Задача по рекурсии

Разработать рекурсивную функцию или процедуру для решения задачи:сформировать строковую величину по закономерности "998987987698765...". Окончание последовательности определяет цифра,введенная с клавиатуры.

ПОЖАЛУЙСТА ПОМОГИТЕ!! ПОНЯТИЯ НЕ ИМЕЮ КАК ЕЕ РЕШАТЬ!
Болванка вне форума
Старый 21.12.2010, 16:01   #2
rubius2008
Форумчанин
 
Регистрация: 19.03.2010
Сообщений: 409
По умолчанию

Код:
function s(s1:string;n:integer):string;
var c:string;
    i:integer;
begin
  str(n,c);
  s1:=s1+c;
  if n=0 then s:=s1 else s:=s1+s(s1,n-1);  
end;
Есть вопросы, пишите в ЛС.
rubius2008 вне форума
Закрытая тема


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Рекурсии RAMA Паскаль, Turbo Pascal, PascalABC.NET 6 18.10.2009 13:56
Задача по рекурсии в Delphi миха18 Помощь студентам 3 31.05.2009 11:39
Рекурсии Logan Паскаль, Turbo Pascal, PascalABC.NET 1 13.05.2008 08:52
ПОМОГИТЕ! ОЧЕНЬ ВАЖНО! Задача на использование рекурсии stscolt Помощь студентам 1 21.04.2008 22:37