СРОЧНО ПОЖАЛУЙСТА!ПАСКАЛЬ! Составьте алгоритм и программу для вычисления суммы S=18cos18x+15cos15x+12cos12x+3cos3x Хотя бы только программу
интересно чем программа от алгоритма отличается в данном случае)))
легче всего в лоб
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. конечно хотелось бы сделать через цикл, но последовательность не понятная
почему не понятная ? арифметическая прогрессия
18 15 12 , а потом вдруг 3 потому и не понятно
на арифметическую прогрессию никак не катит, куда более сложная формула и не достаточно тех точек что даны, чтоб четко вычислить формулу
ну ладно,еще попробую додумать))) в любом случае спасибо!!!)))
или ктото не правильно написал условие и сам виноват