Головна | Реєстрація | Вхід | RSS | П`ятниця, 04.26.2024, 2:53 PM |
Довідник для учнів та студентів | |
Вітаю Вас Гость |
|
Задача Фібоначіprogram fibonachi; var i,n,f1,f2,f3: integer; begin writeln ('vvedit kilkist chisel'); readln (n); f1:=1; f2:=1; write (f1,','); for i:=2 to n do begin write (f2,','); f3:=f1+f2; f1:=f2; f2:=f3; end; readln end. |
|
Guide-for-students © 2024 |
Створити безкоштовний сайт на uCoz |