Lind ja arvutamine vba-s (0)

Liikumiste arv Tee pikkus mm Aeg Ülesanne 1 Koostage programm, mis paneb linnu l pääseb puurist välja. Linnu lendu modelleeritakse järgmiselt 1. Linnu asukoht muudetakse juhusliku nihke võrra. Juhusarvude tekitamine on 2. Tehakse paus 0,1 s. Programmi Pau Tegevus kordub, kuni lind saab puurist Töölehele väljastatakse tehtud sammu millimeetrites (1pt ~ 25.4/72 mm) ja a
Ülesanne 2 Koostage programm Tagasi, mis paigu keskpunkti.
Sub paus (pp) Programmi algus ' pp - pausi kestvus sekundites ... Dim t ' juhuarvude generaatori algväärtustamine t = Timer + pp Randomize Do ... DoEvents 'arv - tekkiv arv vahemikus [a,b] Loop Until Timer > t 'a - vahemiku algus, b - vahemiku lõpp End Sub arv = RND * (b-a) + a ... Programmi lõpp Joonis 1. Programm "paus"
Joonis 2. Juhuslike arvude genereerimine ne 1 e programm, mis paneb linnu lendama niikauaks, kuni ta puurist välja. ndu modelleeritakse järgmiselt: asukoht muudetakse juhusliku vertikaalse ja horisontaalse rra. Juhusarvude tekitamine on näidatud joonisel 2. se paus 0,1 s. Programmi Paus teksti leiate jooniselt 1. kordub, kuni lind saab puurist välja. e väljastatakse tehtud sammude arv, läbitud teekond trites (1pt ~ 25.4/72 mm) ja aeg.
ne 2 e programm Tagasi, mis paigutab linnu algseisu ehk puuri kti.
algväärtustamine
us [a,b] ahemiku lõpp
de genereerimine Aste Arv 5 0 Arvuta Tagasi Ülesanne 1 Koostage programm Arvuta, mis kontrolib kasutaja liitmise oskust ning teeb järgmist.
1. Küsib kahe arvu liitmise tulemust. Arvud genereeritakse juhuslike arvude generaatori RND abil vahemikus 1 kuni 30. 2. Kasutaja vastab. Kui vastus on õige, liigub õhupall vasakule. Kui vastus on vale, lendab õhupall ülesse. See, kui kaugele nihkub õhupall vasakule või ülesse, sõltub astmest , mida töölehelt loetakse. Astme arvestamise meetodi mõtleb välja programmi koostaja . 3. Õhupall liigub kuni jõuab sinise taeva alumise piirini või seinani . 4. Esitatud küsimuste arv väljastatakse töölehele. Ülesanne 2 Koostage programm Tagasi, mis paigutab õhupalli algseisu ehk õhupalli korv seisab platformi keskel
Tagasi