Môže to urobiť niekto Dokáže tieto WAP v qbasic zobraziť 1 15913 999 2 1491625 100 3 50454035 0 4 1x2 plus 2x3 3x4 9x10 nájsť?

Jasné! Tu sú programy QBasic pre dané WAP:

Program 1:Displej 1 15913 999 2 1491625 100 3 50454035 0

```qzákladné

Program REM na zobrazenie 1 15913 999 2 1491625 100 3 50454035 0

„Deklarovať premenné“.

Čísla DIM()

číslo =0

'Inicializujte pole s hodnotami

Čísla (0) =1

Čísla(1) =15913

Čísla(2) =999

Čísla(3) =2

Čísla(4) =1491625

Čísla(5) =100

Čísla(6) =3

Čísla(7) =50454035

Čísla(8) =0

'Zobraziť prvky poľa

FOR num =0 AŽ UBound(čísla)

PRINT Numbers(num);

ĎALŠIE č

'Ukončite program

KONIEC

```

Program 2:Zobrazenie 1x^2 + 2x^3 + 3x^4 + ... + 9x^10 =?

```qzákladné

Program REM na zobrazenie 1x^2 + 2x^3 + 3x^4 + ... + 9x^10 =?

„Deklarovať premenné“.

DIM Coefficients(10) 'Uchováva koeficienty polynómu

DIM Powers(10) 'Uchováva mocniny x zodpovedajúce koeficientom

total =0 'Bude obsahovať súčet polynómu

i =0 'Počítadlo slučiek

'Inicializujte koeficienty a mocniny

PRE i =0 AŽ 10

Koeficienty (i) =i + 1

Mocniny (i) =i + 2

ĎALEJ i

„Vypočítajte súčet

PRE i =0 AŽ 10

súčet =súčet + Koeficienty (i) * x ^ Mocniny (i)

ĎALEJ i

„Zobrazte sumu

PRINT "Súčet polynómu:"; celkom

'Ukončite program

KONIEC

```

Všimnite si, že druhý program predpokladá premennú x je definovaný a má určitú hodnotu. Ak chcete, aby program pracoval pre rôzne hodnoty x , budete musieť používateľa vyzvať, aby zadal hodnotu x a uložte ho do premennej.

• Predchádzajúca strana: Má počítač zabudovaný modem? 
• Ďalšia strana: Generuje väčšina faxových zariadení cng tón?