Run Code
|
API
|
Code Wall
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
exercicio 2 2019 11 11
'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) 'Your code goes here dim x as integer=1 dim y as integer=1 dim s as decimal dim sequencia_x as integer=12 dim sequencia_y as integer=12 dim valor_maximo as integer=45 console.writeline( "(" & x & "/" & y & ")") 'processo do until y=valor_maximo s=s+(x/y) x=x+sequencia_x y=y+sequencia_y console.writeline( s ) console.writeline( "(" & x & "/" & y & ")") loop console.writeline( "s=" & s) End Sub End Module End Namespace
run
|
edit
|
history
|
help
0
check with hashset
bb
Selected Shakespeare Sonnet for doy mod 150
Project Euler 1
ABS Cracker
CAI Visual Basic - Ej Citas
valor maximo entre 3 numeros
CALCULADORA
RSA Encyption example with large numbers using System.Numerics.BigInteger
ok