Small Basic (zadatak)

Trebao bih pomoć oko (trivijalnog) zadatka koji pokušavam rješiti u Small Basicu jer sam početnik...

Zadatak glasi:

Napišite program koji u unosu prvo prima koliko će se brojeva unijeti, a potom se unosi toliko brojeva. Izračunajte i ispišite zbroj (sumu) svih parnih brojeva. Maksimalno se smije unijeti 20 brojeva, a unijeti brojevi moraju biti cijeli, pozitivni i manji od 100.

Zapeo sam kod unošenja brojeva, pokušao sam i s petljama ali ipak ne znam kako... Molio bih vas za pomoć/objašnjenje kako bih to mogao napraviti. Hvala.

pocetak:

TextWindow.WriteLine("Koliko brojeva želite unijeti?")

unos = TextWindow.ReadNumber()

If unos > 20 Then

  TextWindow.WriteLine("Moguće je unijeti najviše 20 brojeva, pokušajte ponovno.")

  Goto pocetak

Else 

  TextWindow.WriteLine("Unesite " + unos + " brojeva.")

EndIf

If unos < 1 Then

  TextWindow.WriteLine("Broj mora biti veči od nule, pokušajte ponovno.")

EndIf

For i=1 To unos

  TextWindow.ReadNumber()

EndFor

Jesi me uhvatio, kada sam radio u BASIC-u, ali probat ću u nešto, kako se inkrementira varijabla u BASICU?

Nešto tipa ovoga, @rustweaver zna raditi u BASICU, kada on dođe neka prepravi

Nemoj koristiti labele i GOTO!!!

10 CLS

20 CLEAR

30 PRINT "Koliko brojeva želite unijeti?"

40 DIM unos AS INTEGER

50 INPUT unos

60 IF unos > 20 THEN

   PRINT "Moguće je unijeti najviše 20 brojeva, pokušajte ponovno."

70 END IF

80 ELSE

90 DIM suma AS INTEGER

100 FOR i= 0 TO unos STEP 1 

110 suma++      REM pošto ne znam kako se inkrementira u BASICU, radim kao u C-u

120 NEXT i

 Nije bitno, algoritam je isti.