Question

Draw a flowchart and write a program in Qbasic to display the first 10 terms of the series :
a) 3,6,12,24,..............
b)-1,2,5,8,.............
c)7,14,21,.......

Answer 1

Answer:

A)

START

C=1

S=3

PRINT S

S=S*2

C=C+1

IS

C<=10?

IF YES THEN GOTO

"PRINT S"

IF NO THEN

STOP

Explanation: this flowchart is the first one. I know the others too if I get time I will post the others too.

Answer 2

Programs:

a) 3,6,12,24,...

Dim i As Integer

Dim x As Integer

Cls

x = 3

Print x

For i = 1 To 9

   Print x * 2

   x = x * 2

Next i

End

b) -1,2,5,8,...

Dim i As Integer

Cls

For i = 0 To 9

   Print (i * 3) - 1

Next i

End

c) 7,14,21,...

Dim i As Integer

Cls

For i = 1 To 10

   Print i * 7

Next i

End