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

Question

Информатика

Поляха

24 марта, 12:49

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

+3

Ответы (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.