Programma 1:Display 1 15913 999 2 1491625 100 3 50454035 0

```qbasis

REM-programma voor weergave 1 15913 999 2 1491625 100 3 50454035 0

'Verklaar variabelen

DIM-nummers()

aantal =0

'Initialiseer de array met waarden

Getallen(0) =1

Getallen(1) =15913

Getallen(2) =999

Getallen(3) =2

Getallen(4) =1491625

Getallen(5) =100

Getallen(6) =3

Getallen(7) =50454035

Getallen(8) =0

'Toon de array-elementen

FOR getal =0 TO UBound(Getallen)

PRINT-nummers (aantal);

VOLGENDE nummer

'Beëindig het programma

EINDE

```

Programma 2:Weergave 1x^2 + 2x^3 + 3x^4 + ... + 9x^10 =?

```qbasis

REM-programma voor weergave van 1x^2 + 2x^3 + 3x^4 + ... + 9x^10 =?

'Verklaar variabelen

DIM Coëfficiënten(10) 'Bevat de coëfficiënten van de polynoom

DIM Powers(10) 'Bevat machten van x die overeenkomen met coëfficiënten

totaal =0 'Bevat de som van de polynoom

i =0 'Lusteller

'Initialiseer coëfficiënten en machten

VOOR i =0 TOT 10

Coëfficiënten(i) =i + 1

Machten(i) =i + 2

VOLGENDE ik

'Bereken de som

VOOR i =0 TOT 10

totaal =totaal + Coëfficiënten(i) * x ^ Machten(i)

VOLGENDE ik

'Toon de som

PRINT "Som van de polynoom:"; totaal

'Beëindig het programma

EINDE

```

Merk op dat het tweede programma uitgaat van de variabele x is gedefinieerd en heeft enige waarde. Als u wilt dat het programma werkt voor verschillende waarden van x , moet u de gebruiker vragen de waarde van x in te voeren en sla deze op in een variabele.