Autor Wiadomość
Piotr-246
PostWysłany: Sob 15:27, 09 Sty 2021    Temat postu:

Skąd się wzięły te liczby?


255*256=65536 - "typowa liczba informatyczna"

65536 / 3600 = 18,204444444

Czyli co godzinę 65536 cyknięć komórki o adresie 1132
Piotr-246
PostWysłany: Sob 14:59, 09 Sty 2021    Temat postu:

Z Internetu:

"This interrupt occurred every 54.925 msec, or about 18.2 times per second."
Piotr-246
PostWysłany: Sob 14:55, 09 Sty 2021    Temat postu:

Przy następnym uruchomieniu programu, liczby te różnią się.

Już przy 60, 100 sekundach widać różnice.

Jednak wiem, że zegary nie były resetowane.
Piotr-246
PostWysłany: Sob 14:50, 09 Sty 2021    Temat postu:

Podsumowanie:

Gdy minęło 3600 sekund komórka cyknęła 65519 razy dając współczynnik 18.19972
Gdy minęło 4000 sekund komórka cyknęła 72802 razy dając współczynnik 18.2005

--------------------------------------------------------------------------------------
Programik który to obliczył:

CLS
DEF SEG = 0
petla:

pomoc$ = MID$(TIME$, 7, 2)
sekunda = VAL(pomoc$)
komorka = PEEK(1132)

IF ses <> sekunda THEN liczsek = liczsek + 1: ses = sekunda: IF (liczsek / 10) = INT(liczsek / 10) THEN PRINT liczsek, liczkom, liczkom / liczsek

IF kos <> komorka THEN liczkom = liczkom + 1
kos = komorka


key$ = INKEY$: IF key$ <> "" THEN END
GOTO petla
Piotr-246
PostWysłany: Sob 14:46, 09 Sty 2021    Temat postu:

poczekałem do 4000

sek: 4000
peek: 72802
wsp: 18.2005
Piotr-246
PostWysłany: Sob 14:39, 09 Sty 2021    Temat postu:

poczekałem do 3300

sek: 3300
peek: 60057
wsp: 18.19909

poczekałem do 3600

sek: 3600
peek: 65519
wsp: 18.19972
Piotr-246
PostWysłany: Sob 14:29, 09 Sty 2021    Temat postu:

poczekałem do 2700

sek: 2700
peek: 49133
wsp: 18.19741

poczekałem do 3000

sek: 3000
peek: 54595
wsp: 18.19833
Piotr-246
PostWysłany: Sob 14:21, 09 Sty 2021    Temat postu:

poczekałem do 2200

sek: 2200
peek: 40030
wsp: 18.19545

poczekałem do 2500

sek: 2500
peek: 45492
wsp: 18.1968
Piotr-246
PostWysłany: Sob 14:12, 09 Sty 2021    Temat postu:

poczekałem do 1700

sek: 1700
peek: 30926
wsp: 18.19176


poczekałem do 2000

sek: 2000
peek: 36389
wsp: 18.1945
Piotr-246
PostWysłany: Sob 14:04, 09 Sty 2021    Temat postu:

przeskoczę do 1200

sek: 1200
peek: 21823
wsp: 18.18683

poczekałem do 1500

sek: 1500
peek: 27285
wsp: 18.19
Piotr-246
PostWysłany: Sob 13:55, 09 Sty 2021    Temat postu:

sek: 600
peek:10899
wsp: 18.165

przeskoczę do 800

sek: 800
peek: 14541
wsp 18.17625

przeskoczę do 1000

sek:1000
peek: 18182
wsp: 18.182
Piotr-246
PostWysłany: Sob 13:47, 09 Sty 2021    Temat postu:

sek: 300
peek: 5438
wsp: 18.12667

sek: 400
peek: 7257
wsp: 18.1425

sek: 500
peek: 9079
wsp: 18.158
Piotr-246
PostWysłany: Sob 13:43, 09 Sty 2021    Temat postu:

Nieco inna wersja programu może pokazać obliczenia co 10 sekund:

sek: 60
peek: 1068
wsp: 17.8

sek: 100
peek: 1796
wsp: 17.96

sek: 200
peek: 3617
wsp: 18.085
Piotr-246
PostWysłany: Sob 13:03, 09 Sty 2021    Temat postu:

Ciekawy programik do przeliczenia współczynnika między ilością sekund wyznaczoną przez funkcję TIME$ a ilością zliczeń komórki 1132.

Po upływie 2237 sekund (tyle starczyło cierpliwości) zsumowana liczba "cyknięć" komórki 1132 wyniosła 40703.

Co daje w przelicznik 18.19535

Widać, że z upływem czasu przelicznik ten stabilizował się wokół liczb 18.19 lub 18.2

Ostatecznie, na ekranie pozostało kilka liczb z przedziału 18.19446 - 18.19535

----------------------------


DEF SEG = 0
petla:

pomoc$ = MID$(TIME$, 7, 2)
sekunda = VAL(pomoc$)
komorka = PEEK(1132)

IF ses <> sekunda THEN liczsek = liczsek + 1
ses = sekunda
IF kos <> komorka THEN liczkom = liczkom + 1
kos = komorka

PRINT liczsek, liczkom, liczkom / liczsek


key$ = INKEY$: IF key$ <> "" THEN END
GOTO petla
Piotr-246
PostWysłany: Pią 21:07, 08 Sty 2021    Temat postu:

Ciąg znaków przeniesiony do A$ wpisuje się w mniejszym przedziale czasu - 116 taktów (komórki 1132)

Powered by phpBB © 2001, 2005 phpBB Group