X
تبلیغات
پیکوفایل
رایتل

قرآن در کامپیوتر

دانلود نرم افزار های قرآنی یه صورت رایگان

دنباله ی فیبوناتچی

دنباله ی فیبوناتچی
CLS
F1 = 1: F2 = 1
INPUT A
FOR I = 1 TO A
   PRINT F1;
   F3 = F1 + F2
   F1 = F2: F2 = F3
NEXT I

 

تاریخ ارسال: سه‌شنبه 16 مرداد‌ماه سال 1386 ساعت 06:43 ب.ظ | نویسنده: مهندس | چاپ مطلب 0 نظر