function fibrec(n: Integer): Integer;
var
temp: Integer;
begin
temp := 0;
if (n = 0) then temp := 1;
if (n = 1) then temp := 1;
if (n > 1) then temp := fibrec(n — 1) + fibrec(n — 2);
Result := temp;
end;
А ваще, если эти пидоры решили каго-та падъебнуть, то могут идти нахуй! Их здесь никто не задерживает. Они сосать будут не нагибаясь. Я таких драл в перегрёб возле параши, блядь. Шайка уродов, нормальный тест нихуя сделать не могут. ПИДАРЫ, БЛЯДЬ!!!
И еще. Проходили на разных компах. На 15 (вроде) вопросе у нее про двоичную систему, а у меня 1,2,3,4... f. Почему так? Я не смог ответить и дальше проходили на ее компе:(
Комментарии
var
temp: Integer;
begin
temp := 0;
if (n = 0) then temp := 1;
if (n = 1) then temp := 1;
if (n > 1) then temp := fibrec(n — 1) + fibrec(n — 2);
Result := temp;
end;
Залажал на 8, просто лень заморачиваться. А в целом понравилось.
http://konkursa.net/konkurs...
http://konkursa.net/konkurs...
у тебя шестнадцатиричная