Фірма випускає стільці двох видів: AiБ. Для випуску одного стільця виду А потрібно 2 м дощок, 0,5 м’ тканини і 2 людино-години. Для випуску одного стільця виду Б — 4 м дощок, 0,25 м2 тканини і 2,5 людино-години. За 1 тиж- день фірма може використати не більше ніж 440 м дощок, 65 мтканини і 320 людино-годин. Фірма продає один стілець виду А за 80 грн, а один сті- лець виду Б — за 120 грн. Скільки стільців кожного виду має випустити за тиждень фірма, щоб вкластися в допустимі ресурси й отримати найбільший прибуток? Розв'яжіть задачу, використавши табличний процесор.

...А если интересует решение на классическом Паскале, предлагаю просто поддерживать текущее, предыдущее и пред-предыдущее значения в ряду, и в цикле обновлять ответ.

Обрати внимание! longint может хранить значения только до , поэтому конкретно в этой программе вывод будет достоверным только для N ≤ 46. Ты можешь сделать текущую, предыдущую и пред-предыдущую переменные типа int64, и тогда максимальное значение N возрастёт до 92. Для бОльших N тебе придётся писать длинное сложение.

var

i, n, pred, predpred, cur: longint;

begin

read(n);

if n = 1 then writeln(1)

else if n = 2 then writeln('1 1')

else write('1 1 ');

if n < 3 then exit;

pred := 1;

predpred := 1;

for i := 3 to n do

begin

 cur := pred + predpred;

 write(cur, ' ');

 predpred := pred;

 pred := cur;

end;

writeln;

end.

def check_perfect(number:int, dividers = []):

for i in range(1, number):

 if number%i == 0:

  dividers.append(i)

if sum(dividers) == number:

 return 1

def get_div(num, div = []):

for i in range(1, num):

 if num%i == 0:

  div.append(i)

return div

def main():

number = int(input())

if check_perfect(number):

 print(' '.join(str(num) for num in get_div(number)))

else:

 print(0)

if __name__ == '__main__':

main()

Объяснение:

На случай, если сайт сломает табуляции в коде (А он их сломает), ниже представлен скриншот оригинала кода. Программа протестирована.