Kirjautuminen

Haku

Tehtävät

Koodit: QB: Alkuluvut

Kirjoittaja: Jogge

Kirjoitettu: 31.08.2002 – 31.08.2002

Tagit: matematiikka, koodi näytille, vinkki

Tämä ohjelma tulostaa näytölle alkulukuja (eli lukuja jotka ovat jaollisia vain itsellään, sekä ykkösellä). Ohjelmasta ei ole varsinaista hyötyä, mutta jos jotain kiinnostaa kannattaa kokeilla.

Edit: kirjoitusvirhe korjattu.

WIDTH 80, 50  'isoin tekstitila
CLS 'tyhjennetään näyttö
a = 3 'asetetaan lähtöluku
DO
  juttu = 1 'hörwä
  FOR b = 2 TO a - 1
    IF a MOD b = 0 THEN juttu = 0: EXIT FOR 'jos a jaettuna b:llä jakojäännös on 0 niin juttu = 0
  NEXT
  IF juttu = 1 THEN PRINT a; 'jos juttu=1 niin tulostetaan luku näytölle
  a = a + 1 'seuraava luku...
LOOP

Kommentit

Jogge [01.09.2002 13:09:35]

#

oho jäi kirjoitusvirhe, ohjelma sanassa on yksi oo liikaa :P

Joni_ [01.09.2002 15:22:35]

#

perseestä.

Jogge [01.09.2002 16:03:03]

#

sitte on!

(nimetön) [01.09.2002 16:56:51]

#

joni, koitahan kirjoittaa hieman asiallisempia kommentteja.

Dj Wolf [01.09.2002 20:48:05]

#

Tuli muuten mieleeni, että on vieläkin suurempi näyttötila, Width 80,60, mutta se taitaa toimia vain screen 12 -moodissa :/

Jogge [02.09.2002 16:32:34]

#

se toimii screen 11 -moodissa

Tatu Peltola [03.09.2002 15:51:11]

#

Olen minäkin tehnyt PAREMMAN alkulukujen etsijän. Se etsii ennemmänkin kuin näytölle mahtuu. Lukuja voi liikutella (katsella eri paikoista) nuolinäppäimillä eli kaiken ei tarvi mahtua näytölle. Pitäiskö se laittaa tänne vinkkeihin?

(nimetön) [03.09.2002 20:35:13]

#

Ihan kiva... Mutta jos haluamme tutkia onko luku p alkuluku niin meidän tarvitsee tutkia jaollisuutta vain p^0,5 saakkaa. Tietenkin nopeutta haettaessa voidaan käyttää eratotheneenseulaa. Jonka miinuksena on se että se vie äärettömästi muistia, mutta se onkin äärettömän nopea ;)

Heikki [02.01.2004 11:25:58]

#

Optimointia kaivataan...

Kirjoita kommentti

Muista lukea kirjoitusohjeet.
Tietoa sivustosta