HOME FORUMS MEMBERS RECENT POSTS LOG IN  
× Авторизация
Имя пользователя:
Пароль:
Нет аккаунта? Регистрация
Баннер 1   Баннер 2
НОВЫЕ ТОРГОВАЯ НОВОСТИ ЧАТ
loading...
Скрыть
Вернуться   ANTICHAT > ПРОГРАММИРОВАНИЕ > С/С++, C#, Rust, Swift, Go, Java, Perl, Ruby
   
 
 
Опции темы Поиск в этой теме Опции просмотра

  #9  
Старый 13.12.2007, 17:35
HulkRus
Новичок
Регистрация: 06.12.2007
Сообщений: 17
С нами: 9699828

Репутация: 31
По умолчанию

Lexx, вы много знаете о haskell? Программами на этом языке нужно любоваться) А вы так про реккурсию плохо отзываетесь
rubik-nerubik, надыбай модуль для работы с длиннющими числами и вот те с longint, реккурентное соотношение нашел, функцию написал), работает реактивно и никаких циклов! Паскаль:
Код:
program Good;
uses crt;
var
  k,max:byte;
function fuck(k:byte):longint;
  begin
  if k=1 then fuck:=1
  else fuck:=(max-k+2)*fuck(k-1)+1;
end;
begin
  readln(k);  max:=k;
  writeln(fuck(k));
end.
 
Ответить с цитированием
 



Предыдущая тема Следующая тема

Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
 


Быстрый переход




ANTICHAT ™ © 2001- Antichat Kft.