Run Code
|
API
|
Code Wall
|
Users
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
Project Euler 1
'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 Namespace Rextester Public Module Program Public Sub Main(args() As string) Dim sum as Integer = 0 Dim n as Integer = 1 While n < 1000 if n Mod 3 = 0 Or n Mod 5 = 0 Then sum += n End If n += 1 End While Console.Writeline(sum) End Sub End Module End Namespace
run
|
edit
|
history
|
help
0
Please
log in
to post a comment.
Reed Solomon error correction (success)
Math.Abs
CAI Visual Basic - Ej Elecciones
ex4
Poem of the day from 'Selected Poems of Rumi (Dover Thrift Edition)'
exercicio 4
VB checking whether a date is between 2 dates
CAI Visual Basic - Ej Citas
Sonnet of the day from sparkenotes no fear shakespeare...
CFX.EXE
Please log in to post a comment.