Begin:o=0;e=0;listforeach(m, d=((1, 2, 2, 3, 3, 4, 4, 4, 5, 5, 6, 6, 6, 6, 7, 7, 8, 8, 9, 9, 9, 10, 10, 10, 10, 12, 12, 12, 12, 14, 14, 15, 15, 16, 18, 18, 18, 18, 20, 20, 20, 20, 21, 21, 24, 24, 25, 27, 27, 28, 28, 30, 30, 30, 30, 35, 35, 36, 36, 36, 40, 40, 42, 42, 45, 45, 49, 50, 50, 54, 54, 60, 60, 63, 63, 70, 70, 81, 90, 90, 100);
if(m%2==0,e=e+1, o=o+1);print"Even Num =",e; print"Odd Num =", o
OUTPUT:
Even products = 56
Odd products = 25
Probability =56 / 81