Вычислить значение суммы N членов следующего ряда: 13+k/2+к/3+к/4 ... N>0, K>0 вводятся с клавиатуры

Question

Информатика

Ратибор

7 апреля, 05:42

Вычислить значение суммы N членов следующего ряда: 13+k/2+к/3+к/4 ... N>0, K>0 вводятся с клавиатуры

+2

Ответы (1)

Знаете ответ?

Стоян · Answer 1

Вроде как вот так:

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.