miten vb:llä voi vertailla esim. lukuja. esimerkiksi miten todennäköinen seuraava luku seuraavista luvuista 1, 4, 7, 8, 12 vertaillaan? APUVAA!
voisitteko laittaa lähdekoodi / kertoa apua?
voisitteko laittaa lähdekoodi / kertoa apua?
Visual basic ongelma
Christian
10883
0Äänestä
Vastaukset 10
Vanhimmat
vertailu menee ihan IF .. THEN .. ELSE .. END IF -rakenteella...Mutta sitä et varmaan kysy.
Tai sitten (hmm...mites tää nyt basicissa menikään...)
select case muuttuja
case 1: 'jos 1 niin sitä
case 2: 'jos 2 nii tuota'
case else: 'jos jotain muuta
end select
No todennäköisyyksistä: mistä nuo luvut 1,4,7,8,12 tulevat? jos ne tulevat satunnaislukugeneraattorilta niin ne on teoriassa yhtä todennäköiset kaikki, tod.näk. =1/6 jos kyseessä vain nuo luvut. Jos kone arpoo lukuja 1-12 niin tod.näk. =1/12 jne. Jos et tiedä, miten luvut saadaan, tee testi. Anna koneen generoida muutamia (kymmeniä, satoja) miljoonia lukuja ja laske kunkin numeron esiintymien lkm ja jaa se kokonaismäärällä niin saat arvion todennäköisyydestä.
miten lukusarja 1, 4, 7, 8 ja 12 jatkuu?
tuonhan pystyy ratkaisemaan, mutta laajemmin käsitettynä semmonen problematiikka, että jatka vaan, p&7... :)
saatan olla väärässäkin.
jos en, niin vb-ongelmahan tämä ei (vielä) ole.
Alkuperäisen kysymyksen asettelu oli hieman (hmm..) "sekava" mutta nyt kun sen sanoiksi puit niin voisinpa väittää että ongelman ratkaisu yleisellä tasolla on mahdoton, ainakin tapauksissa, joissa lukusarjan jäsenet voidaan laskea mielivaltaisella tavalla. Tuo esim. oli kyllä suht helppo jos sen oikein hoksasin - itse olen sitä mieltä että sarja jatkuu 19,27,39,58,85 jne. Eli basicilla iteroiden:
DIM apu(3) 'sarjan alku
apu(1) = 1
apu(2) = 4
apu(3) = 7
j = 0
WHILE j < 25 'tulostetaan 25 kpl lukuja
uusi = apu(1) apu(3) 'lasketaan sarjan seuraava jäsen
FOR i = 1 TO 2
apu(i) = apu(i 1) 'siirrytään sarjassa luku eteenpäin
NEXT
apu(3) = uusi
PRINT uusi 'tulostetaan uusi sarjan luku
j = j 1
WEND
matikassa on se hyvä puoli, että ei tartte paljon väitellä :) Ja jos mulle aletaan latelemaan korkeampaa matikkaa, kuuntelen sujuvasti.
Ohjelmoinnissahan sitä tarvitaan perin harvoin, ja silloin voi kysyy joltain matematitiikolta :)
Olikohan tuo kysymys tarkoitettu näin? pitää odotella.
odotellessa ihan pieni tehtävä p&7:lle: millä todennäköisyydellä lotossa (nykyisessä suomalaisessa) saadaan 0,1,2,3,4,5,6 ja 7 oikein, kun lototaan 1 rivi?
kuulosti helpolta kun joku tota kysy, mutta sitten totesin, ettei todennäköisyyslaskutaitoni riitä ratkaisemaan kaikkia noita. joten tein kokeellisen tutkimuksen ja selvitin sen.
varaudu pieneen yllätykseen, kun olet ratkaissut nuo...
1 oikein 1/5.57
2 oikein 1/35.29
3 oikein 1/261.11
4 oikein 1/2350.03
5 oikein 1/27417
6 oikein 1/466089
7 oikein 1/15380937
mäin tämä menee.
mutta se 0 oikein.hmmm.
olisiko noin 1/1.269230769231.....
tuo oli kai jostain napattua tietoa ja varmasti oikeaa, mutta onko todennäköisyyslaskelmien mukainen?
Nuo poikkeaa omasta kokeestani niin paljon, että ei voi olla satunnaislukugeneraattorin ominaisuuksien syytä.
Tuo 0 oikein 1/1.269...? Eikö se merkitse sitä, että melkein joka kerta tulos on 0?
Täytyypa tarkentaa joko kysymystä tai omaa kokeellista tutkimusta :) Koe tehtiin kahdella erillisellä 'miljoona miljoonaa'-arvonnalla.
1) 100/ 39/7
2) 100/ 39/7*38/6
3) 100/ 39/7*38/6*37/5
4) 100/ 39/7*38/6*37/5*36/4
5) 100/ 39/7*38/6*37/5*36/4*35/3
6) 100/ 39/7*38/6*37/5*36/4*35/3*34/2
7) 100/ 39/7*38/6*37/5*36/4*35/3*34/2*33/1
nolla oikein taas laskin plussaamalla nuo yhteen
kyllä se varmaankin on oikein, mutta kuintenkin 1 oikein voi saada vain noin 17% varmuudella + nuo muut niin 0 oikein tulokselle jää se 73%
ainoastaan eka oli oikein :).
7 oikein:
7:n kombinaatiot 39:stä eli comb(39,7)=39!/32!7!=15380937 kpl
erilaisia rivejä, joista 1 oikein
-> t=1/15380937=0,000000065016=0,0000065016%
6+vara oikein:
6 oikein, 1 väärä. Väärä valitaan 3:sta varanumerosta. Yksi väärä voi
olla mikä tahansa 7:stä eli 3*7=21 mahdollisia 6+vara -rivejä.
t=21/15380937=0,000001365326=0,0001365326%
6 oikein:
6 oikein, 1 väärä. Väärä voi olla mikä tahansa lopuista 29 numerosta
39-7-3=29 (39 kaikki numerot, 7 normaalit, 3 varanumbat) ja väärä voi
osua mihin tahansa kohtaan 7:stä eli 7*29=203 mahdollista riviä.
t=203/15380937=0,000013198156
=0,0013198156%
5 oikein:
väärin voi olla 2 numeroa, kombinaatioita comb(7,2)=7!/5!2!=21 ja
mahdollisia vääriä numeroita comb(32,2)=496 eli yht. 21*496=10416.
t=10416/15380937=0,000677201916=0,0677201916%
4 oikein:
väärin 3, väärät kombinaatiot comb(7,3)=35, vääriä numeroita comb
(32,3)=4960 eli yht. 35*4960=173600. t=173600/15380937=0,011286698593
=1,1286698593%
3 oikein:
t=comb(7,4)*comb(32,4)=0,081828564801
=8,1828564801%
2 oikein:
t=comb(7,5)*comb(32,5)=0,274943977730=27,4943977730%
1 oikein:
t=comb(7,6)*comb(32,6)=0,412415966596
=41,2415966596%
0 oikein:
t=comb(7,7)*comb(32,7)=0,218832961867
=21,8832961867%
Jos yllärillä tarkoitit tuota 0-rivin todennäköisyyttä niin ekalla
kerralla kun sen joskus laskin, niin se vähän kyllä yllätti...
lyhentelin liikaa noita 0-3 oikein...tuossa korjaukset:
3 oikein:
t=comb(7,4)*comb(32,4)/15380937
=0,081828564801=8,1828564801%
2 oikein:
t=comb(7,5)*comb(32,5)/15380937
=0,274943977730=27,4943977730%
1 oikein:
t=comb(7,6)*comb(32,6)/15380937
=0,412415966596=41,2415966596%
0 oikein:
t=comb(7,7)*comb(32,7)/15380937
=0,218832961867=21,8832961867%