# Problem #17 of the book: THE MAN WHO COUNTED (Sample Programs)

Problem #17 of the book: THE MAN WHO COUNTED

Caption/title: THE APPLES AND ANTS or 90 APPLES

See:

http://www.arvindguptatoys.com/arvindgupta/count.pdf

::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::

cls
#apples
a0 = 50
b0 = 30
c0 = 10

m = 0
mk = 0
ml = 0
mj = 0
y = 0
for j = 1 to 10
x = 0
#grups of apples
a1 = int(a0/j)
b1 = int(b0/j)
c1 = int(c0/j)
#remain of apples
a2 = a0 - (a1*j)
b2 = b0 - (b1*j)
c2 = c0 - (c1*j)
#comprobate apples
a3 = a1 + a2
b3 = b1 + b2
c3 = c1 + c2

if (a1*j)+a2 = a0 and (b1*j)+b2 = b0 and (c1*j)+c2 = c0 then
x = 1
end if

if x = 1 then
for k = 1 to 10 #price first phase
for l = 1 to 10 #price second phase
a5 = (a1 * k) + (a2 * l)
b5 = (b1 * k) + (b2 * l)
c5 = (c1 * k) + (c2 * l)

if a5 = b5 and a5 = c5 and b5 = c5 then
print "fatima first phase : "+a1*j +" apples bring a profit of "+a1*k +" dinars"
print "fatima second phase: "+a2+" apples bring a profit of "+a2*l +" dinars"
print "fatima total : "+a0+" apples bring a profit of "+a5 +" dinars"
print
print "cunda first phase : "+b1*j +" apples bring a profit of "+b1*k +" dinars"
print "cunda second phase: "+b2+" apples bring a profit of "+b2*l +" dinars"
print "cunda total : "+b0+" apples bring a profit of "+b5 +" dinars"
print
print "shia first phase : "+c1*j +" apples bring a profit of "+c1*k +" dinars"
print "shia second phase: "+c2+" apples bring a profit of "+c2*l +" dinars"
print "shia total : "+c0+" apples bring a profit of "+c5 +" dinars"
print

goto fin
end if

next l

next k
end if

next j
fin:
print "End"

end

## Problem #17 of the book: THE MAN WHO COUNTED

I do think I will need to read that book in detail. Thanks for posting that one.

## Problem #17 of the book: THE MAN WHO COUNTED

Hi,Jim:

The book, stories of the Middle Ages Arabic.

The few problems apparently are simple and the solution proposed by the protagonist is very ingenious.

It is entertaining and fun book!

The interesting thing about the program, read the book and their stories.

Thank you for your opinion Jim!

Regards