Question

Write a program in QB64 to print first 10 multiples of 6,7and 8

Answer 1

Write a program in QB64 to print first 10 multiples of 6,7and 8

Answer 2

Answer:

CLS

PRINT "Multiples of 6"

y = 1

FOR y = 1 TO 10

   x = 6

   PRINT x; "x"; y; "="; x * y

NEXT y

y = y + 1

PRINT "Multiples of 7"

r = 1

FOR r = 1 TO 10

   s = 7

   PRINT s; "x"; r; "="; s * r

NEXT r

r = r + 1

PRINT "Multiples of 8"

p = 1

FOR p = 1 TO 10

   q = 8

   PRINT q; "x"; p; "="; q * p

NEXT p

p = p + 1

END