mirror of
https://github.com/MartinThoma/LaTeX-examples.git
synced 2025-04-25 22:38:04 +02:00
Tippfehler korrigiert; Beispiele hinzugefügt
This commit is contained in:
parent
deea4832fe
commit
0a336199c5
8 changed files with 68 additions and 22 deletions
BIN
documents/Programmierparadigmen/scripts/c/fibonacci
Executable file
BIN
documents/Programmierparadigmen/scripts/c/fibonacci
Executable file
Binary file not shown.
|
@ -0,0 +1,14 @@
|
|||
int fib(int n) {
|
||||
if (n < 0) {
|
||||
return -1;
|
||||
}
|
||||
|
||||
int fib[2] = {0, 1}, tmp;
|
||||
|
||||
for (; n > 0; n--) {
|
||||
tmp = fib[1];
|
||||
fib[1] = fib[0] + fib[1];
|
||||
fib[0] = tmp;
|
||||
}
|
||||
return fib[0];
|
||||
}
|
|
@ -1,5 +1,5 @@
|
|||
fibAkk n n1 n2
|
||||
| (n == 0) = n1
|
||||
| (n == 1) = n2
|
||||
| (n == 0) = n1
|
||||
| (n == 1) = n2
|
||||
| otherwise = fibAkk (n - 1) n2 (n1 + n2)
|
||||
fib n = fibAkk n 0 1
|
||||
|
|
|
@ -0,0 +1,5 @@
|
|||
fib(0, A, _, A).
|
||||
fib(N, A, B, F) :- N1 is N - 1,
|
||||
Sum is A + B,
|
||||
fib(N1, B, Sum, F).
|
||||
fib(N, F) :- fib(N, 0, 1, F).
|
Loading…
Add table
Add a link
Reference in a new issue