Run Code
|
API
|
Code Wall
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
pgcd def
'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 a,b,p as integer console.writeline("valeur de a?") a=console.readline() console.writeline("valeur de b?") b=console.readline() do If a>b then do a=a-b loop until a<=b else if a<b then do b=b-a loop until b<=a end if loop until a=b console.writeline("le PGCD vaut" & a) End Sub End Module End Namespace
run
|
edit
|
history
|
help
0
Reed Solomon error correction (success)
VB checking whether a date is between 2 dates
Expand Treeview Job Entry Epicor - VB
Extract values from square brackets
valor maximo entre 3 numeros
exercicio 4
exercicio 2
Black Jack
If Function returns not Nothing for DateTime
falhanço épico