QuickBASIC (QBASIC)

1

QuickBASIC (QBASIC)

offline
  • Pridružio: 23 Feb 2008
  • Poruke: 610

QBASIC je jedan od pocetnickih programskih jezika..Ja ga sada ucim u skoli i idem na takmicenje ali nasao sam jedan zadatak i ne mogu ga rijesiti pa bih molio ako neko zna da mi napise..HVALA

----------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------
Napisi program kojim se zadato "n" i zadato "m" izracunava suma po formuli
S=n+(n+m)+(n+2m)+...+(n+nm)
---------------------------------------------------------------------------------------
---------------------------------------------------------------------------------------

Problem mi predstavljaju one tri tackice...Ne znam sta one oznacavaju...Ako neko zna rijesiti bio bih Mu zahvalan....



Registruj se da bi učestvovao u diskusiji. Registrovanim korisnicima se NE prikazuju reklame unutar poruka.
offline
  • Pridružio: 04 Sep 2003
  • Poruke: 24135
  • Gde živiš: Wien

Pa u pitanju je petlja.
Koeficijent ispred m ti se menja od 1 do n



offline
  • Pridružio: 23 Feb 2008
  • Poruke: 610

Da shvatio sam to, ali nemam nikakve ideje da postavim zadatak pa ako bi bio ljubazan da mi to uradis..Jer bih to trebao saznati sto prije...HVALA

offline
  • Pridružio: 04 Sep 2003
  • Poruke: 24135
  • Gde živiš: Wien

Uh, ima vec 15 godina od kada sam ja radio u tom QBasicu, ko ce sada da se seti naredbi...

Evo ti u Pascalu, pa ti probaj da prevedes na QBasic:

S := 0; For i := 0 to n do begin   S := S + (n + i*m); end;

offline
  • Civil Works Team Leader @ IKEA Centres Russia
  • Pridružio: 22 Jun 2005
  • Poruke: 7912
  • Gde živiš: Moskva, Rusija

U QBasicu, ako se dobro secam, to bi trebalo da glasi slicno:

S=0 INPUT n,m FOR i=0 TO n  S=S+(n+i*m) NEXT i PRINT "Trazena suma je ",S END

Isti slucaj kao i kod bobby-ja, poslednji put sam u QBasic-u radio negde tamo u gimnaziji, pre 15-16 godina... Nisam siguran za naredbu INPUT, takva je bila u BASIC-u koji sam prvi naucio, jos na ZX Spectrumu... Komanda koja trazi da se unesu n i m...

offline
  • Pridružio: 23 Feb 2008
  • Poruke: 610

Ljudi hvala vam puno..Pa javim vam danas kako sam prosao na takmicenju...HVALA

Dopuna: 28 Mar 2008 12:30

Jos jedno pitanje..
Ako imam petlju npr
FOR i=1 to 10 step 2
koju formulu koristit da bi mi sabralo sve neparne brojeve...Mislim da na kraju dobijem samo jedan rezultat a ne vise njih
znaci samo sve neparne da mi sabere

offline
  • Civil Works Team Leader @ IKEA Centres Russia
  • Pridružio: 22 Jun 2005
  • Poruke: 7912
  • Gde živiš: Moskva, Rusija

@nihad001

Petlju si krenuo od broja 1, znaci neparnog. Step 2 znaci da ce u sledecem prolasku petlje uzeti broj 3, pa 5 itd. Tj. petlja ti "prolazi" kroz neparne brojeve sama po sebi.

Da bi dobio zbir tih brojeva, pre petlje zadaj neku promenljivu da je jednaka 0 i onda joj u petlji dodaj broj kroz koji petlja prolazi (i).

S=0 FOR i=1 TO 100 STEP 2   S=S+i NEXT i PRINT S END

offline
  • Pridružio: 23 Feb 2008
  • Poruke: 610

Ljudi hvala vam a da vam kazem I sam na skolskom osvojio sam 100/100 poena...HVALA vam puno ste mi pomogli

offline
  • Pridružio: 04 Sep 2003
  • Poruke: 24135
  • Gde živiš: Wien

Oces reci osvojio si 60, jer 20 ide meni i 20 Moskovcu Smile

offline
  • Pridružio: 23 Feb 2008
  • Poruke: 610

Da nam ne bi ovo preslo u chat jos cu ovu poruku odg..Ma moze i po 25 tebi moskovcu a vidjet cemo sad na kantonalnom kako cu proci ako koji zadatak zapne javim vam se pa cete dobiti opet poene..hehe...HVALA jos jednom

Ko je trenutno na forumu
 

Ukupno su 1314 korisnika na forumu :: 36 registrovanih, 5 sakrivenih i 1273 gosta   ::   [ Administrator ] [ Supermoderator ] [ Moderator ] :: Detaljnije

Najviše korisnika na forumu ikad bilo je 3466 - dana 01 Jun 2021 17:07

Korisnici koji su trenutno na forumu:
Korisnici trenutno na forumu: _Rade, aleksmajstor, babaroga, BlekMen, Brana01, cemix, darionis, darios, draganca, FileFinder, Georgius, Griffon vulture, ILGromovnik, kikisp, Kubovac, kybonacci, ljuba, Mcdado, Mercury, Mihajlo, milenko crazy north, nebkv, nemkea71, Ripanjac, RJ, ruma, Seeker, solic, srbijaiznadsvega, Srle993, vladaa012, VP6919, W123, YU-UKI, zillbg, Čivi