14. В ячейку А7 - надпись - Период интеллектуального цикла
15. В ячейку В7 - надпись -33
16. В ячейку С7 - надпись - Длительность прогноза
17. В ячейку D7 - надпись - 30
18. В ячейку А8 - надпись - Результаты
19. В ячейку А9 - надпись - Порядковый день
20. В ячейку В9- надпись - Физическое
21. В ячейку С9 - надпись - Эмоциональное
22. В ячейку D9 - надпись - Интеллектуальное
23. В ячейку А10 - формула - =$d$6
24. В ячейку А11 - формула - =a10+1
25. В ячейку B10 - формула - = sin ((2*Пи ()*а10-$d$5)/23)
26. В ячейку C10 - формула - = sin ((2*Пи ()*а10-$d$5)/28)
27. В ячейку D10 - формула - = sin ((2*Пи ()*а10-$d$5)/33)
28. Протянуть ячейку A11 за маркер заполнения вниз на 1 месяц
29. Протянуть ячейки B10, C10, D10 за маркер заполнения вниз на 1 месяц
30. Нарисовать графики для всех рассчитанных ячеек: $A$9:$D$42 и разместить его на текущем или отдельном листе. Выделить весь диапазон, Вставка - график
31. Анализ результатов: при изменении даты рождения и даты отсчета вид графиков 3-х состояний меняется
Язык не указан → приведу пример на SWI-Prolog.
Код%Файл string_sortin.plsort([], [], _).sort([Head|Tail], Ordered, Qrd) :- sort(Tail, SubSorted, Qrd), put(Head, SubSorted, Sorted), order(Sorted, [], Ordered, Qrd).put(X, [], [X]).put(X, [H|T], [X,H|T]) :- compare(>, X, H).put(X, [H|T], [H|R]) :- put(X, T, R).order(X, _, X, ">").order([], R, R, "<").order([H|T], B, R, "<") :- order(T, [H|B], R, "<").select(">", Bufer, Bufer, _, ">").select("<", Bufer, Bufer, _, "<").select(S, Bufer, [S|Bufer], Ord, Ord).input_strings(Input, Bufer, Strings, Ord, ROrd) :- compare(=, Ord, "="), read_string(Input, "\n", "\r", _, String), select(String, Bufer, SS, Ord, OO), input_strings(Input, SS, Strings, OO, ROrd).input_strings(_, Strings, Strings, Ord, Ord). ?- current_input(Input), input_strings(Input, [], Strings, "=", Ord), sort(Strings, [R|_], Ord), writeln(R).
