Question

СРОЧНО ПОЖАЛУЙСТА!ПАСКАЛЬ!
Составьте алгоритм и программу для вычисления суммы
S=18cos18x+15cos15x+12cos12x+3cos3x
Хотя бы только программу

Answer 1

var
    x,s: real;

begin
    readln(x);
    s := 18 * cos(18 * x) + 15 * cos(15 * x) + 12 * cos(12 * x) + 3 * cos(3 * x);
    writeln(s);
end.

конечно хотелось бы сделать через цикл, но последовательность не понятная

Answer 2

почему не понятная ? арифметическая прогрессия

Answer 3

18 15 12 , а потом вдруг 3 потому и не понятно

Answer 4

на арифметическую прогрессию никак не катит, куда более сложная формула и не достаточно тех точек что даны, чтоб четко вычислить формулу

Answer 5

ну ладно,еще попробую додумать))) в любом случае спасибо!!!)))

Answer 6

или ктото не правильно написал условие и сам виноват