Run Code
|
API
|
Code Wall
|
Users
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
gf
'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) 'Declaração de variaveis' Dim S as decimal Dim Passo as integer = 1 Dim Denominador as integer = 1 Console.WriteLine(Passo & " " & Denominador) 'Processamento' Do until Passo = 99 Soma = soma + (Passo/Denominador) Passo + Passo + 2 Denominador = Denominador + 1 Console.WriteLine(Passo & " " & Denominador & " " & Soma) Loop End Sub End Module End Namespace
run
|
edit
|
history
|
help
0
Please
log in
to post a comment.
Web application
exercicio A
Rounding behaviours
VBA
Selected Shakespeare Sonnet for doy mod 150
Range List for VisualBasic.NET
loop 1
exercicio 2 2019 11 11
5
ABS Cracker
Please log in to post a comment.