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

Если не работает - отпиши, заскриню свой код, мог просто удалить во время переноса кое-что

хорошо,спасибо)

Вроде как вот так:Program aasfa;var n,i: integer; k,z: real;beginWriteln('Введите N:');readln(N);Writeln('Введите K:');readln(K);z:=13;For i:=2 to N doz:=K/i+z;Writeln(z);end.