Keskustelu: Ohjelmointikysymykset: QB: Jakojäännös qb

Voiko qbasicilla palauttaa jakojäännöksen jollain
funktiolla? jos ei niin miten se tapahtuu?

Voi palauttaa ja se tapahtuu MOD-operaattorilla:

PRINT 10 MOD 3 'jakojäännös on 1

Kiitän

Kiertotietä tapahtuu näin (ei tarkoita että tätä pitäisi käyttää ;-)

PRINT 10 - (INT(10 / 3) * 3)

hmmm?
eiks sen pitäis olla:

INPUT "Ensimmäinen luku" A
INPUT "Toinen luku" B
C = A MOD B
PRINT A
PRINT " MOD"
PRINT B
PRINT "Tulos="; C

?
mutta en itse tiedä miten saa siinä koko vastausta:D

Eli siis mitä tarkoitat koko vastauksella?
Tuokin koodisi on aivan virheellinen, sillä sitä voi lyhentää huomattavasti ja sieltä puuttuu sitä sun tätä (mm. pari pilkkua)...

INPUT "Ensimmäinen luku: ", a
INPUT "Toinen luku: ", b
PRINT a; "MOD"; b; "="; a MOD b

lainaus:

Eli siis mitä tarkoitat koko vastauksella?
Tuokin koodisi on aivan virheellinen, sillä sitä voi lyhentää huomattavasti ja sieltä puuttuu sitä sun tätä (mm. pari pilkkua)...

INPUT "Ensimmäinen luku: ", a
INPUT "Toinen luku: ", b
PRINT a; "MOD"; b; "="; a MOD b

on tuokin on virheellinen,siitä ei tule kuin 1 luku eikä sitä mitä jää tai toisitenpäin

PS.ei niitä pilkkuja tartte

Siis mitä virheitä tuossa omassani on, pitäisikö sen näyttää myös sen jakolaskun tulos?
Itseltäsi puuttuivat pilkut INPUT-käskystä, eikä se toiminut sen takia.

'No nyt tämä näyttää tuloksen JA jakojäännöksen
INPUT "Ensimmäinen luku: ", a
INPUT "Toinen luku: ", b
PRINT a; "/"; b; "="; INT(a / b); "ja jakojäännös on"; a MOD b

Mulla se kyllä toimii ilman pilkkujakin,eikä se ole jakolasku vaan jakojäännös,en ehdi nyt kokeilla tuota koodia,mutta ei siitä kai tule mitään: 1 jää 5?