есеп шығаруға көмек керек

0 дауыс
762 қаралым
1 1 2 3 5 8 13 21 34 55....... осылай Фибоначчи есебі кете береді. Осының программасын құра аласыңба? Паскаль тілінде(hi)
• Санаты: Информатика | 762 қаралым

1 жауап

0 дауыс
фибоначи а және b аралығында ма? әлде n мүшеден тұрам ма? әлде n ге дейінгі сандар үшін бе? шектеу қандай?
n ге деін. Бірақ неғұрлым простой түрде шығарылса, әйтпесе өтпеген заттар көп еді!!!
var n,i,k,j:integer;
Begin
read( n );
i:=1;j:=0; write(i);
reapat
k:=i;
i:=j+i;
j:=k;
if i>n then break;
write(' ', i);
until false;
End.

Ұқсас сұрақтар

+1 дауыс
1 жауап
127,937 сұрақ
322,814 жауап
153,169 пікір
72,931 қолданушы