Форумы-->Форум для внеигровых тем-->
| Автор | Prolog... есть ведающие? |
|---|
| собственно, надо решить две задачки методом рекурсии... понимает кто что в Prolog? | | ну, давай | 1+сумма(((-1)^k)/2k!)=cos1
k=1..бесконечность | 1+сумма(((-1)^k)/(2k)!)=cos1
k=1..бесконечность
так правильнее | есть пример для:
сумма(1/(2k-1)!)=sh1
domains
Res = Real
predicates
show_window
play_ent
f(integer, integer)
goal
show_window,
play_ent.
clauses
show_window:-makewindow(2,3,6,"Menu",2,30,12,50),
write("Type the ineger..."), nl.
play_ent:-write("k="), readint(K), R=K*2-1, f(R,V),
Res=1/V, write("Result = "), write(Res).
f(1,1):- !.
f(N,R):- M=N-1, f(M,V), R=V*N. | | Пролог интригующий. | | Пролог интригующий-не то слово, но что то мне в последней строчке не понравилось -незаконченно как то выглядит -экспрессии что ли не хватает | | да не то слово... | | тема закрыта by McDy (2011-11-15 12:08:52) |
|---|
К списку тем
|
