Написать в pascalABC. Вычислите значение суммы N членов следующего ряда: k/1 + k/3 + k/5..... N>0, K>0 - вводится с клавиатуры.
Написать в pascalABC. Вычислите значение суммы N членов следующего ряда: k/1 + k/3 + k/5..... N>0, K>0 - вводится с клавиатуры.
Похожие вопросы
Не можешь разобраться в этой теме?
Обратись за помощью к экспертам
Гарантированные бесплатные доработки в течение 1 года
Быстрое выполнение от 2 часов
Проверка работы на плагиат
Поможем написать учебную работу
N, K, i: integer;
sum, denominator: real;
begin
write('Введите N: ');
readln(N);
write('Введите K: ');
readln(K);
sum := 0;
denominator := 1;
for i := 1 to N do
begin
sum := sum + K / denominator;
denominator := denominator + 2;
end;
writeln('Сумма ', N, ' членов ряда: ', sum);
end.
Пример работы программы:
Введите N: 5Введите K: 2
Сумма 5 членов ряда: 3.46667