David Gabrielsen

Satan, dette er helt utrolig! Vi slo Tyskland og endte opp som nummer to i gruppa. Dette trur jeg vi aldri har klart før, gratulerer til alle norkse hockey-fans, nå er det på tide å legge seg! (Vi møter Latvia, Canada og USA i mellomspillet, og blir garantert rævkjørt, men vi slipper i det minste å spille nedrykkskamper til B-VM ) god natt.

Men hvorfor telles ikke tallet 1 som et primtall? Kilde : http://en.wikipedia.org/wiki/Prime_number

Herregud, pilotene har et nok par timer loggført kan man si! Dødsfett!

For eksempel å gi de ungdommene som trenger det i forbindelse med arbeid dispensasjon? Ser ikke helt problemet. Det jeg derimot ser problemet med er unge gutter som tror dem er verdensmestere etter å ha hatt lappen i 3 uker, og kjører som om de har stjålet bilen. Den tragedien som skjedde på Bygdøy i helgen er helt ufattelig, og hvis en slik regel kan redde liv, så er det en fin investering spør du meg.

denne bør være vanntett... :-) dim sjekktall sjekktall = " " do while(isnumeric(sjekktall) = false) sjekktall = abs(inputbox("Skriv inn tallet du vil sjekke om er et primtall (Godtar kun tall)")) loop primtall = true if sjekktall MOD 2 = 0 then primtall = false nevner = 2 else maks_nevner = int(sjekktall / 2) for nevner = 3 to maks_nevner step 2 rest = sjekktall MOD nevner if rest = 0 then primtall = false exit for end if next end if if primtall = false then msgbox sjekktall & " er ikke et primtall, og er delelig med " & nevner else msgbox sjekktall & " er et primtall!" end if

Takk for oppklaringen Skal lage et nytt vanntett script :-)

På bakgrunn av Ole-Jørgen sin måte, lagde jeg et vb-script man kan bruke: dim sjekktall sjekktall = " " do while(isnumeric(sjekktall) = false) sjekktall = abs(inputbox("Skriv inn tallet du vil sjekke om er et primtall (Godtar kun tall)")) loop tverrsum = getTverrsum(sjekktall) siste_tall = getLastDigit(sjekktall) melding = "dette er ikke et primtall" if(sjekktall = "3") then melding = "dette er et primtall!" end if if siste_tall = 1 or siste_tall = 3 or siste_tall = 7 or siste_tall = 9 then resttall = tverrsum MOD 3 if resttall <> 0 then melding = "dette er et primtall!" end if end if msgbox melding private function getTverrsum(my_number) dim i, size, retval size = len(my_number) for i = 1 to size step 1 retval = retval + clng(mid(my_number, i, 1)) next getTverrsum = retval end function private function getLastDigit(my_number) getLastDigit = mid(my_number, len(my_number)) end function Lim inn innholdet i notepad, lagre fila som primtall.vbs (må ha vbs som extension), dobbeltklikk fila..

Bare så det er sagt : Ole-Jørgen sin måte er laaaangt mer elegant enn mitt forslag

Da er den også endret til rest.. Var litt trøtt her. For å spesifisere : Altså, om man deler oddetallet X med et partall, så vil dette gi restverdi, derfor kun vits å øke nevneren med to for hver sjekk (om man starter på 3).

Tror det er ingen annen måte enn å øke nevneren med én for hver gang (start på 3 og til (( / 2) - 1), for deretter sjekke om det gir noe restverdi eller ikke. Eksempel, tallet 17... ingen vits i å sjekke om tallet er delelig med 2 fordi kun partall kan deles på 2, så vi starter på 3: 17 / 3 = 5,666666667 17 / 4 = 4,25 17 / 5 = 3,4 17 / 6 = 2,833333333 17 / 7 = 2,428571429 17 / 8 = 2,125 ingen vits i å sjekke på noe høyere nevner fordi dette vet vi vil gi rest, ergo : 17 er et primtall. Blir litt kjedeligere med tallet 123512352345343 feks... :smirk: Er tallet ditt et partall kan du jo utelukke om det er et primtall umiddelbart, men det viste du sikkert. ;-) Mulig det finnes noen smartere måte, men jeg klarer ihvertfall ikke å se noen.. EDIT : Man trenger vel strengt tatt ikke sjekke på partall i nevner heller, for det vil jo alltid gi rest...

Kjempebra bilder, veldig høy kvalitet!

Kjøpekraft er et ukjent begrep blant mange brukere av dette forumet dessverre. Her sammenligner vi drivstoffpriser med Spania og USA, uten å ta i betraktning hva en gjennomsnittelig amerikaner har i lønn, for ikke snakke om en spanjol. Greit nok at det er dyre priser, men sammenlignet med Spania er det LATTERLIG billige drivstoffpriser i Norge.

Jeg begriper ikke hvordan det i det hele tatt går an å avsløre hele spillet TO føkkings dager etter at det er sluppet ut. Irriterer meg grenseløs over at jeg leste her på forumet før du klarte å få fingern ut å redigere posten din. Kjøpte GTA IV i dag, kom hjem, logga meg på forumet, og det første jeg leste var spoilern.. takk skal du f@en meg ha...

jeg forstod ikke argumentet ditt.. Grunnen er, Ivar, som du sier, at undersøkelser viser at risikoen for ulykker blir redusert om du sitter i en bil med klimaanlegg.

Win32/64, PC i ordets rette forstand innbefatter også Linux og Mac og alle andre Personal Computers. Uansett, kildekoden er vel skrevet i C++, så da er det vel bare å kompilere denne til hvilket som helst system, er det ikke? Jeg har ihvertfall små problemer med å kompilere den samme C++ koden til Win32 og Linux. Et par småjusteringer avhengig av hva programmet gjør bare.

Det er en del variabler du må tenke på. Om du ikke har lån vil jeg anbefale deg å kjøre forsiktig, og kun gå for ansvarsforsikring (altså det som er påkrevd). Hvor mye egenandel "tåler" du? Jeg har nettopp kjøpt meg en Volvo V50, 2006-modell, men da med full kasko da jeg av åpenbare grunner ikke hadde råd til å cashe ut 330.000 blanke kroner. Jeg valgte If, av den enkle grunn at de var billigst (rundt 6000 i året for 20000 km). Nå er jeg 30 år og har heller ikke vært skyldig i noen crash enda (bank i bordet), derfor vil jeg nok anta at det vil bli dyrere for en 22-åring, men hvis du ikke har lån på den, ville jeg gått for kun ansvarforsikring og da lander du på muligens noe av det samme? Blei mye prat her, men rådet mitt : Gå for det billigste, kjør forsiktig, og sats på at du ikke er skyldig i en eventuell kræsj/bulk (knock on wood). Kan nok stemme at differansen mellom ansvar og delkasko ligger på rundt 1000 kroner, men det er jo ingen vits i å "gi" bort 1000 kroner til et forsikringsselskap, er det? ;-)

jeg har XBOX, men ikke anskaffet meg GTA IV enda. Men jeg tror jeg kommer til å fokusere på single player-delen, ihvertfall med det første. Men skal notere meg nicket ditt. :-) Mitt nick er forøvrig "david d0ppler", og tar gjerne en kamp NHL 08 med deg

Min erfaring med trådløse "gitarkabler" er at de biter deg i rompa når du minst trenger det (les : konsert). Mulig at dette systemet har blitt bedre med årene, men jeg innbiller meg at du må punge ut med atskillig mer enn 3000 for å få et solid system. En kabel til et par, tre hundre er 100 ganger mer pålitelig mener nå jeg.

suveren flyvertinne!

Uten at jeg har noen som helst kunnskap i VBA, så antar jeg at Target er et objekt som refererer til hvilke(n) celle® som blir manipulert, som du eventuelt kan gjøre noe med, hvilket ikke er nødvendig i ditt tilfelle antar jeg.