Søg
Avatar billede meyer Nybegynder
29. april 2003 - 12:45 Der er 5 kommentarer og
1 løsning

Tværsum ??????

Hvorfor giver den her KUN 3 ????

tal = 345
tversum = tal
do while len(CStr(tversum)) > 1
  temp = 0
  for i = 1 to len(CStr(tversum))
    temp = temp + Int(Mid(CStr(tversum),i,1))
  next
  tversum = temp
loop

Response.Write "Tværsummen af " & tal & " er " & tversum

meyer
Avatar billede eagleeye Praktikant
29. april 2003 - 12:49 #1
Tversummen bliver man ved med at regne på indtil der kun er et enkelt ciffer tilabge så det er rigtigt nok:

3+4+5 = 12  -->  1+2 = 3
Avatar billede snaptil Nybegynder
29. april 2003 - 12:50 #2
øøøh er tværsum af 345 ikke 3 4+5=9 som bliver 0 rest er 3.. ja jeg spørger bare
Avatar billede eagleeye Praktikant
29. april 2003 - 12:51 #3
Hvis du vil havde en Sum af tallene så skal du bare fjerne do while delen:


tal = 345
tversum = tal
  temp = 0
  for i = 1 to len(CStr(tversum))
    temp = temp + Int(Mid(CStr(tversum),i,1))
  next
  tversum = temp

Response.Write "Summen af " & tal & " er " & tversum
Avatar billede meyer Nybegynder
29. april 2003 - 12:51 #4
ahhhh....ok :-)

Tak skal du ha' :-)
Avatar billede snaptil Nybegynder
29. april 2003 - 12:51 #5
hep hep
Avatar billede meyer Nybegynder
29. april 2003 - 12:52 #6
snaptil>> ;-)
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Programmeringssprog kurser
Kurser inden for grundlæggende programmering
Se alle Programmeringssprog kurser

Flere spørgsmål fra ASP kategorien

Titel Indlæg Oprettet Seneste aktivitet
ASP classic kopiere database fil på server Af bsn i ASP 7 31/10/202610:20 01/11/202620:28
Persits.Upload Af bsn i ASP 9 17/09/202611:37 21/09/202615:15
Jeg bakser med noget Database og If Then med ASP - hvad gør jeg galt? Af Peer i ASP 10 25/06/202622:20 04/09/202602:30
Tjek alle checkbox i form Af bsn i ASP 4 18/05/202601:57 19/05/202613:33
Lost focus Af bsn i ASP 1 07/11/202415:34 01/01/202514:58
Se alle spørgsmål i kategorien Opret spørgsmål

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Opret Log ind

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten
Seneste spørgsmål Seneste aktivitet
I går 08:39 Produktnøgle Af hkv i Office & Kontorpakker
13/1116:59 Bitlocker Af nico i Windows
12/1116:30 Wlan i windows 11 home Af dcedata1977 i Windows
11/1121:19 Irriterende ikon på proceslinjen Af ErikHg i Windows
11/1116:33 Kan man slippe af med "msn" ? Af Ikke-ekspert i Windows
White papers
Flere white papers »