Вычислить значение суммы N членов следующего ряда: 16+k/3+k/6+k/9…. N больше 0,K больше 0 вводятся с клавиатуры Блок схему и паскаль
Вычислить значение суммы N членов следующего ряда: 16+k/3+k/6+k/9…. N>0,K>0 вводятся с клавиатуры
Блок схему и паскаль
Гость
Ответ(ы) на вопрос:
Гостьvar k, n, i: integer;
sum: real;
begin
readln(n, k);
sum:=16;
for i:=1 to n-1 do
sum:=sum+k/i*3;
writeln(sum);
end.
Не нашли ответ?
Похожие вопросы