QBasic - zbrajanje pomoć

Zar ne znaš kako se piše petlja for? U njoj ne moraju ići isljučivo brojevi upisani u samom kodu, nego mogu ići varijable. Znači broj 1 (žuto) možeš zamijeniti varijablom min, broj 6 (zeleno) možeš zamijeniti varijablom recimo max. Prije ulaska u petlju, naravno, tražiš od korisnika minimalnu vrijednost, odnosno broj od, koju spremiš u varijablu min, te maksimalnu vrijednost, broj do, koju spremiš u varijablu max.

Nije mi baš najjasnije. Što konkretno bi korisnik trebao zadavati? Početni n i krajnji n? Koji je cilj programa? Da se zbroje svi n(n+1)/2 u zadanom intervalu?

BTW pogledao sam sad ponovno tvoj kod i ne mogu reći da mi je jasno IF n = 3 THEN 1, jer n uvijek bude 3 u trećoj iteraciji, dakle bez obzira što ti petlja ide do 6, program ti se UVIJEK prekida kad n postane 3, znači efektivno imaš petlju od 1 do 3.

Cekaj ako sam dobro razumio treba ti zbir brojeva od x do y..

CLS

INPUT X

INPUT Y

FOR I=X TO Y

S=S+I

NEXT I

PRINT S

END

Ovaj ti je najjednostavniji program za to..Ne znam cemu komplikovati,unesi pa ces vidjeti.

Hhahahahah cudi me da nisi znao tako rjesiti..

Pa eto pokusaj..

Tako sam ja radio te zadatke dok sam jos radio u Qbasicu..

A na primjer da je htio da dobije proizvod brojeva iz nekog intervala onda je samo trebao umjesto S=S+I staviti P=P*I.

SIMPLE

.. jer je nešto (htio) petljao s formulom za niz (školski, ne kompjuterski..).

-na kompjuteru (osim ako postoji razlog) računa se 'pješice'. Kao što je već dat odgovor for-next:s=s+i ... kojem još samo treba dodati input x-y (i eventualne onerrore..).

Možeš na više načina. Mislim da bi najjednostavniji bio ovo - imaš dva stringa, s_razmacima i bez_razmaka. U string s_razmacima upišeš rečenicu ili štoveć, iz čega želiš izvaditi razmake. String bez_razmaka ti je inicijalno prazan. I onda samo ideš jedan po jedan znak (od prvog do zadnjeg) po stringu s_razmacima i gledaš - ako je taj znak različit od razmaka, dodaš ga na kraj stringa bez_razmaka - dakle, bez_razmaka = bez_razmaka + znak.

 -dva načina (koja mi padaju na pamet).

-prvi 'pješice' kao što mb iznad predlaže.

.. izmjeriš LEN(a$), for-next x to lenA, if trenutni string-jedno slovo <>CHR$(32) (space) then b$=b$(left$(a$,x,1):  .. next. (for nextom postavljaš fixne brojače, elegantniji je Do-Loop s uvjetima, ista stvar ali increment moraš odraditi ručno, ali dobijaš i ostale moguće uvjete until, while.. (i nisam siguran dali qbasic ima exit for-nexta, dok iz  doloop ima. Obično je u programiranju korisnije (jer često treba više opcija) ali za konkretan primjer je nevažno.

-drugi način, je tražiti poziciju traženog stringa unutar stringa (ne znam napamet naredbu, prolistaj string operacije, compare naredbe), u primjeru je to 5, 9, gotovo, tad se left$, start-stop, + lef$...  u jednoj formuli zbroji u željeni string.

ovisno o kombinaciji (duljina stringa, broj 'spacera'..) svaki način može imati prednost, pa je (zbog učenja) potrebno znati oba načina primjeniti ovisno o potrebi. Generalno je 'pješice' univerzalniji, ali s duljim stringom sporiji (zbog iteracija for-nexta..), dok je drugi kompliciraniji za natipkati, time i za održavati (kod mogućih izmjena), zato pravilo KISS ponekad ima prednost pred brzinom.