Паскаль, циклы

[gennadii]

Здесь будет точно цикл for:

Дано натуральное число N и вещественное число X. Вычислить:
1) sin x + sin2 x + ... + sinn x
2) sin x + sin x2 + ... + sin xn
3) sin x + sin sin x + ... + sin sin ... sin x

[Stilet]

Ну а проблема в чем?

[ViktorR]

Будет лучше, если записать эти примеры сразу с использованием правил языка (ну хотя бы в части):
1) sin(x) + sin(2*x) + ... + sin(n*x)
2) sin(x) + sin(x*х) + ... + sin(x*х*x*...*x)
3) sin(x) + sin(sin(x)) + ... + sin(sin( ... (sin(x))...))

Сумму вычисляем так:

Sum := 0;
{Заголовок Цикла}
begin
   y := f(x);
   Sum := Sum + y;
end;

В некоторых случаях полезно понимать, что
x := f(x); вычисляется так:
1. Берется текущее значение x и вычисляется выражение f(x).
2. При этом вычисление выполняется где-то ...
3. Полученный результат вычисления записывается в ячейку x.

В последнем примере можно сделать так:

y := f(x);
Sum := y;
{Заголовок цикла}
begin
    y:=f(y);
   Sum := Sum + y;
end;

Тогда на следующем цикле - y := f(f(y)) и т.д.

Как-то так ...

[gennadii]

спасибо огромное