Вычисления по формуле

[random7]

Никак не пойму как это реализовать...

[SuperVisor]

Обычная рекурсия... Даны первые три члена последовательности, остальные вычисляются посредством формулы и так до Ym элемента. Какие вопросы? Что не понятно? Наработки в студию.

[random7]

непонятно многое:
1 как описать данные (y0, y1, y2 должны вводиться с клавиатуры или им надо в программе присвоить конкретные значения)
2 какие нужны переменные (не понимаю как описать Yi-1 и Yi-3)
3 как описать в программе что i изменяется от 3 до m c шагом 1

[SuperVisor]

Сообщение от random7

1 как описать данные (y0, y1, y2 должны вводиться с клавиатуры или им надо в программе присвоить конкретные значения)

Это не имеет значения. В любом случае это вещественные типы данных, которые, судя по условию, все-таки вводятся с клавиатуры.

Сообщение от random7

2 какие нужны переменные (не понимаю как описать Yi-1 и Yi-3)

var
yi1, yi3: real;

Для вычисления остальных значений Вам так же понадобится три вещественных переменных (а можно и старые закрывать...)

Сообщение от random7

3 как описать в программе что i изменяется от 3 до m c шагом 1

for i:= 3 to m do
begin
...
end;

Вам необходимо создать функцию, которая по порядковому номеру элемента просчитывает функцию Y[i]=sin^2(Y[i-1])+cos^2(Y[i-3]). Т.е. Y[i] = sin^2(Y[i-1])+cos^2(Y[i-3]) = MyFunc(i) = sin^2(MyFunc(i-1))+cos^2(MyFunc(i-3))