Run Code
|
API
|
Code Wall
|
Users
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Blog
Fibonacci
program fibo; uses crt; var ant, suc, n , prox : integer; begin ant := 1; suc := 1; prox := ant + suc; write (ant, '-' , suc, '-'); for n := 3 to 15 do begin write (prox, '-'); ant := suc; suc := prox; prox := ant+ suc; end; end.
run
|
edit
|
history
|
help
0
Please
log in
to post a comment.
12345
sort-bubble (begin;main;end)
Урок 3 задача 3
Enigma
2;3
Menukar nilai1
BIANCA SAMPAIO ALFRADIQUE 600615759
09 ariketa
5
1
stackse - search stackoverflow differently
Please log in to post a comment.