Вычисление суммы n первых членов ряда

@Torambu · Регистрация: 16.03.2016

Author24 — интернет-сервис помощи студентам

Помогите с заданием
Вычислить сумму n первых членов ряда:
1 + 1/2 + 1/3 + ...

Пролог пишет No solutions. Visual Prolog 7.2 в PIE.

Prolog

% domains
    % n = integer
    % v = float
    % predicates
    % sum (n, v)
    % clauses
  
     sum (N, V) :-  
     N>0,  
     Next=N-1,
     sum (Next, V),
     V=1/N+V.
     
     goal:- sum (5, X),
     write(X).

Добавлено через 2 часа 0 минут
Сам разобрался, тему можно закрывать.

@Ivandur · 08.06.2018, 23:58

Prolog

 sum (1, 1).
 sum (N, V) :-  
     Next=N-1,
     sum (Next, V1),
     V=1/N+V1.

	08.06.2018, 23:58