Programma 1:Visualizza 1 15913 999 2 1491625 100 3 50454035 0
```qbasic
Programma REM da visualizzare 1 15913 999 2 1491625 100 3 50454035 0
'Dichiara variabili
Numeri DIM()
numero =0
'Inizializza l'array con valori
Numeri(0) =1
Numeri(1) =15913
Numeri(2) =999
Numeri(3) =2
Numeri(4) =1491625
Numeri(5) =100
Numeri(6) =3
Numeri(7) =50454035
Numeri(8) =0
'Visualizza gli elementi dell'array
FOR num =0 TO UBound(Numeri)
STAMPA Numeri(num);
PROSSIMO num
«Terminare il programma
FINE
```
Programma 2:Visualizza 1x^2 + 2x^3 + 3x^4 + ... + 9x^10 =?
```qbasic
Programma REM per visualizzare 1x^2 + 2x^3 + 3x^4 + ... + 9x^10 =?
'Dichiara variabili
Coefficienti DIM(10) 'Contiene i coefficienti del polinomio
DIM Powers(10) 'Contiene le potenze di x corrispondenti ai coefficienti
total =0 'Conterrà la somma del polinomio
i =0 'Contatore di cicli
'Inizializza coefficienti e potenze
PER i =DA 0 A 10
Coefficienti(i) =i + 1
Potenze(i) =i + 2
AVANTI i
«Calcola la somma
PER i =DA 0 A 10
totale =totale + Coefficienti(i) * x ^ Potenze(i)
AVANTI i
'Mostra la somma
PRINT "Somma del polinomio:"; totale
«Terminare il programma
FINE
```
Si noti che il secondo programma assume la variabile x è definito e ha un certo valore. Se vuoi che il programma funzioni con valori diversi di x , dovrai chiedere all'utente di inserire il valore di x e memorizzarlo in una variabile.
networking © www.354353.com