Задача по информатике Дано К. Найти среднее арифметическое значений функций y=sinx для x=1,2,...K (как это на паскале написать)
Задача по информатике Дано К. Найти среднее арифметическое значений функций y=sinx для x=1,2,...K (как это на паскале написать)
Похожие вопросы
Не можешь разобраться в этой теме?
Обратись за помощью к экспертам
Гарантированные бесплатные доработки в течение 1 года
Быстрое выполнение от 2 часов
Проверка работы на плагиат
Поможем написать учебную работу
program average_sinx;
var
K, x: integer;
sum: real;
begin
sum := 0;
write('Enter the value of K: ');
readln(K);
for x := 1 to K do
begin
sum := sum + sin(x);
end;
writeln('The average of sin(x) for x=1 to ', K, ' is: ', sum / K);
end.