هذا برنامج صغير مع نتائجه للحصول على احتمال ظهور العدد2 على أحد الوجهين بشرط المجموع فردي ، <=7
الجزء الأول يحدد عدد الأزواج التي يتواجد فيها العدد 2 وهو 6
لجزء الثاني يحدد عدد الأزواج التي يكون مجموع عنصريها <=7
البرنامج للجزأين يفصلهما ==============
CLS
a = 0
FOR x = 1 TO 6
FOR y = 1 TO 6
z = x + y
IF z / 2 <> INT(z / 2) AND z <= 7 AND (x = 2 OR y = 2) THEN
a = a + 1
PRINT z; "("; x; ","; y; ")"
END IF
NEXT y
NEXT x
PRINT "numbes have 2 = "; a
PRINT "========================================"
a = 0
FOR x = 1 TO 6
FOR y = 1 TO 6
z = x + y
IF z / 2 <> INT(z / 2) AND z <= 7 THEN
a = a + 1
PRINT z; "("; x; ","; y; ")"
END IF
NEXT y
NEXT x
PRINT "numbers <=7 "; a
PRINT "l = 6/12 = 0.5"
**********************************************
النتائج
3 ( 1 , 2 )
3 ( 2 , 1 )
5 ( 2 , 3 )
7 ( 2 , 5 )
5 ( 3 , 2 )
7 ( 5 , 2 )
numbes have 2 = 6
=====================
3 ( 1 , 2 )
5 ( 1 , 4 )
7 ( 1 , 6 )
3 ( 2 , 1 )
5 ( 2 , 3 )
7 ( 2 , 5 )
5 ( 3 , 2 )
7 ( 3 , 4 )
5 ( 4 , 1 )
7 ( 4 , 3 )
7 ( 5 , 2 )
7 ( 6 , 1 )
numbers <=7 12
الاحتمال لظهور 2 على أحد الوجهين علماً بأن المجموع فردي، <=7 هو6 ÷ 12 = 0.5