Run Code
|
API
|
Code Wall
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
wunder
'Rextester.Program.Main is the entry point for your code. Don't change it. 'Compiler version 11.0.50709.17929 for Microsoft (R) .NET Framework 4.5 Imports System Imports System.Collections.Generic Imports System.Linq Imports System.Text.RegularExpressions Function wun(zahl) n = 0 For i = 1 To 10000 If zahl = 1 Then Exit For Else n = n + 1 If zahl Mod 2 = 0 Then zahl = zahl / 2 Else zahl = 3 * zahl + 1 End If End If Next wun = n End Function Namespace Rextester Public Module Program Public Sub Main(args() As string) 'Your code goes here Console.WriteLine("Hello, world!") End Sub End Module End Namespace
run
|
edit
|
history
|
help
0
No fear Shakespeare - sonnet of the day
Exercico 5
Exercício de variáveis 1
select case
Exercicio 1
macro for msg box in outlook
pgcd def
Denary numbers to binary for numbers below 255
String
Exercico 3