×

Loading...

这有何难!看程序。BTW,就凭咱写这几句,在加拿大找个Apple II的工作应该没问题吧?

]LIST
10 DIM A(10)
20 FOR I=1 TO 10
30 READ A(I)
40 NEXT I
50 LET M=A(1)
60 LET N=1
70 FOR I=2 TO 10
80 LET LCM=0
90 LET LCM=LCM+M
100 IF INT(LCM/N)*N<>LCM THEN 90
110 LET M=LCM
120 LET N=A(I)
130 NEXT I
140 PRINT "The lowest common multiple is "; LCM
150 DATA 34,21,6,8,19,2,5,10,24,9
160 END

]
Report