معادلة طارق لحساب عدد الطيور

A+B+C=100 BIRDS

A/10+2B+5C=100 POUNDS

A+20B+50C=1000 POUNDS

C=100-X ==>

A+B=X

X-B+20B+50(100-X)=1000

19B=1000-5000+49X==>

B=49X-4000/19

عدد الوزات :19
عدد البطات : 11
عدد الحمامات : 70
المجموع : 100

و الكود البرمجي لهذه العملية

/**
 *
 *
 * @version 1
 * @copyright Tarek Code written to Solve this Issue
 * More Information : http://www.saitat.com/ ; http://www.xn--mgbuq0c.net/
 */
echo "
<head>
<meta http-equiv='Content-Language' content='ar-sy'>
<meta http-equiv='Content-Type' content='text/html; charset=utf-8'>
<title>معادلة طارق لحساب عدد الطيور</title>
</head>

<body>

A+B+C=100 BIRDS 
A/10+2B+5C=100 POUNDS
A+20B+50C=1000  POUNDS
 
C=100-X ==>
A+B=X
X-B+20B+50(100-X)=1000
19B=1000-5000+49X==>
B=49X-4000/19

";
//حلقة للإحتمالات المطروحة من 1-100 ، يتحقق منها و من الإحتمال الصحيح و يطبعه
FOR ($I=1 ; $I<=100 ; $I++ )
{
//اخترت B للحساب و بناء المعادلة
$B=(49*$I-4000)/19;
// إذا كان العدد الناتج صحيحاًأكمل
if (is_int($B)) {
// إذا كان العدد الناتج موجباً أكمل
if (($B>0)) {
// الإحتمال مقبول ، احسب باقي النتائج و إطبعها
$C=(100-$I);
$A=($I-$B);
$total= ($A+$B+$C);
ECHO "عدد الوزات :$B عدد البطات : $C عدد الحمامات : $A المجموع : $total";
// امتف بأول نتيجة صحيحة أو أكمل لباقي النتائج إذا كان هناك لمزيد ، فقط أزل الإشارة من أمام break للإكتفاء بنتيجة واحدة
//break;
}}
}

مع تحيات : طارق ، مدير موقع سايتات ، دليل المواقع السورية