There are three 3 digit numbers such that the digits 1,2,3...8,9 are used once each to write them. They are found to be in the ratio 1:3:5
Find all such possible triplets.
DEFDBL AZ
DECLARE SUB permute (a$)
CLS
a$ = "123456789": h$ = a$
DO
a = VAL(LEFT$(a$, 3))
b = VAL(MID$(a$, 4, 3))
c = VAL(RIGHT$(a$, 3))
IF a * 3 = b AND b * 5 = c * 3 THEN PRINT a; b; c
permute a$
LOOP UNTIL a$ = h$
does find only one solution:
129 387 645

Posted by Charlie
on 20101111 18:50:28 