②e&en) hlavolamu z FLOPu 34¢¢ Tentokr*t bylo ]kolem nal[zt prvn)ch sto prvo')sel. Op%t lze vymyslet n%kolik r+zn`ch algoritm+ a j* bych V*m tu cht%l p@edv[st podle m[ho n*zoru nejrychlej&).¢ Ka(d[ ')slo lze p@ev[st na sou'in d*le ned%liteln`ch ')sel - prvo')sel. P@i zkoum*n), zda je ')slo prvo')slem ╱a je tud)( d%liteln[ jen jedni'kou a sebou sam`m$ posta') vyzkou&et ji( d@)ve nalezen* prvo')sla ╱pro' zkou&et d%litelnost dev)ti, ka(d[ ')slo d%liteln[ dev)ti je sou'asn% d%liteln[ t@emi.¢ D*le nen) nutn[ zkou&et prvo')sla v%t&) ne( odmocnina ze zkouman[ho ')sla, proto(e v`sledek d%len) by byl men&) ne( zkoumaj)c) ')slo a pokud by byl celo')seln` ╱tedy jednalo by se o prvo')slo$, muselo by se to zjistit ji( d@)ve. Nap@. ')slo 33 ╱odmocnina = 5.7446$ je sice d%liteln[ 11, ale 33:11=3 a je tud)( vyhozeno jako neprvo')slo u( p@i trojce.¢ Nakonec nen) samoz@ejm% nutn[ zkoumat sud* ')sla, kter* jsou v(dy d%liteln* dv%ma ╱co( je jedin[ sud[ prvo')slo$.¢ Jasn%j&) to bude mo(n* p@i pohledu na vlastn) program:¢¢@*dky:¢10 - 80 V`pis hlavi'ky¢90 Vynulov*n) po')tadla 'asu¢100 - 110 Dimenzace pole o 100 prvc)ch, kam se budou ukl*dat v`sledky a nastaven) prvn)ch t@) prvo')sel, kter[ nelze pou(it`m algorimem zjistit plus jejich v`pis na obrazovku¢120 Nastaven) prom%nn[ CISLO na hodnotu 3, tedy t@et) a zat)m posledn) prvo')slo¢130 Cyklus odpo')t*vaj)c) c prom%nn[ POCET zb`vaj)c)ch 97 po')tan*ch prvo')sel¢140 P@i'ten) dvojky k posledn)mu prvo')slu ╱aby bylo op%t lich[ a zji&t%n) jeho odmocniny.¢150 Cyklus odpo')t*vaj)c) ji( zn*m* prvo')sla po')naje t@et)m ╱jedni'ku a dvojku vzhledem k podm)nk*m nem* cenu zkou&et$¢160 Pokud je Q-t[ prvo')slo ji( v%t&) ne( odmocnina ze zkouman[ho ')sla, jedn* se rovn%( o prvo')slo¢170 Pokud ale je v`sledek d%len) CISLO/A╱Q$ celo')seln[, o prvo')slo se ur'it% nejedn* a d*le se ')slo nezkoum*¢180 Konec zkoumac)ho cyklu¢190 ⇨)slo bylo shled*no prvo')slem, vyp)&e se a za'ne se vyhled*vat dal&)¢200 ⇨)slo nen) prvo')slem a POCET je nutn[ sn)(it o jednotku, nebo④ se na dal&)m @*dku inkrementuje¢210 Konec hlavn)ho cyklu¢220 - 270 Bylo nalezeno 100 prvo')sel a vyp)&e se doba v`po'tu¢¢ -JW-¢
