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

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

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

خرد کردن

خرد کردن  
تعداد دفعات ممکن خرد کردن اسکناس 2000 ریالی بکمک سکه های 50 ؛ 100 و 250 ریالی به شرط اینکه از هر سکه حداقل یکی باشد .

Cls

K = 0

For P = 1 To 33

For S = 1 To 17

For D = 1 To 7

Let sum = P * 50 + S * 100 + d * 250

If Sum = 2000 Then k = k + 1

Next D , s , p

Print K

End


 

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