MyCity » Opšte programiranje » Qbasic - Kako rezultat prikazati kao razlomak?

Qbasic - Kako rezultat prikazati kao razlomak?

Napisano na dan: 20.6.2018

Qbasic - Kako rezultat prikazati kao razlomak?

Idi na vrh

Poslao: 20 Jun 2018 11:45
Idi na vrh
offline
  • Pridružio: 11 Okt 2014
  • Poruke: 362

Kako decimalan rezultat prikazati kao razlomak u Qbasic-u ?



Registruj se da bi učestvovao u diskusiji. Registrovanim korisnicima se NE prikazuju reklame unutar poruka.
Poslao: 20 Jun 2018 12:58
Idi na vrh
offline
  • PHP developer
  • Pridružio: 22 Mar 2006
  • Poruke: 3760
  • Gde živiš: 127.0.0.1

[Link mogu videti samo ulogovani korisnici]



Poslao: 21 Jun 2018 12:30
Idi na vrh
offline
  • Pridružio: 11 Okt 2014
  • Poruke: 362

Našao sam način i ovo radi u Q-basicu:

IF x<> INT(x) THEN
FOR top = 1 TO 100000000000
FOR btm = 1 TO 100000000000
IF top / btm = x THEN GOTO prnt
NEXT
NEXT
END IF
prnt: PRINT "REZULTAT: "; STR$(top) + "/" + STR$(btm)

Poslao: 21 Jun 2018 14:45
Idi na vrh
offline
  • Pridružio: 15 Apr 2012
  • Poruke: 141

amar54k ::Našao sam način i ovo radi u Q-basicu:

IF x<> INT(x) THEN
FOR top = 1 TO 100000000000
FOR btm = 1 TO 100000000000
IF top / btm = x THEN GOTO prnt
NEXT
NEXT
END IF
prnt: PRINT "REZULTAT: "; STR$(top) + "/" + STR$(btm)


Resenje je sa aspekta vremenske slozenosti neefikasno, jer koristi 2 ugnjezdjenje for petlje koje treba da odrade velik broj iteracija. Tako da je resenje iz linka sa aspekta efikasnosti bolje.

MyCity » Opšte programiranje » Qbasic - Kako rezultat prikazati kao razlomak?

Ko je trenutno na forumu
 

Ukupno su 4907 korisnika na forumu :: 51 registrovanih, 4 sakrivenih i 4852 gosta   ::   [ Administrator ] [ Supermoderator ] [ Moderator ] :: Detaljnije

Najviše korisnika na forumu ikad bilo je 20624 - dana 04 Apr 2026 04:18

Korisnici koji su trenutno na forumu:
Korisnici trenutno na forumu: aleph_one, Asteker, avijacija, Clouseau, cojapop, Crazzer, dacanaldo, dj.ape, Djokislav, elenemste, FAMAS, Imperator_Aleksandr_lll, jon istvan, JOntra, Josef, Jozo74, kib, Kosmos Banja Luka, Lance Guest, lima, marko79, MB120mm, milanpb, milenko crazy north, Milos ZA, miodrag, Mirage 2000N, mist-mist, Nole, Orc, pein, picknick, Polifon, Radio operater, Semberija, sickmouse, Simulink11000, Spreewerk, Srna, stalja, StefanNBG90, t.mile, Tihi86, Trimi68, v82, Vlada1389, Vlada78, Zgembo78, Zimbabwe, Zorge, ZZZ