Вычислить значение суммы N членов следующего ряда:13+k/2+к/3+к/4...N больше 0,K больше 0 вводятся с клавиатуры
Вычислить значение суммы N членов следующего ряда:13+k/2+к/3+к/4...N>0,K>0 вводятся с клавиатуры
Гость
Ответ(ы) на вопрос:
ГостьВроде как вот так:
Program aasfa;
var n,i: integer;
k,z: real;
begin
Writeln('Введите N:');
readln(N);
Writeln('Введите K:');
readln(K);
z:=13;
For i:=2 to N do
z:=K/i+z;
Writeln(z);
end.
Не нашли ответ?
Похожие вопросы