Premier contact avec VB.Net
Premier contact avec VB.Net
Réponse:
Module PremierProgramme
Sub Main()
System.Console.WriteLine("Bonjour")
System.Console.WriteLine("Riadh!")
End Sub
End Module
Réponse:
Module PremierProgramme
Sub Main()
System.Console.WriteLine(12+13)
End Sub
End Module
Réponse:
Module PremierProgramme
Sub Main()
System.Console.WriteLine(24/5)
End Sub
End Module
Réponse:
Module PremierProgramme
Sub Main()
System.Console.WriteLine(-1 + 3 * 5)
System.Console.WriteLine((24 + 5) % 7)
System.Console.WriteLine(15 + -4 * 6 / 11)
System.Console.WriteLine(2 + 10 / 6 * 1 - 7 % 2)
End Sub
End Module
Réponse:
Module PremierProgramme
Sub Main()
Dim nombre1 As Integer
Dim nombre2 As Integer
Dim multiplication As Integer
System.Console.WriteLine("Entrer 1er numéro")
nombre1 = System.Convert.ToInt32(System.Console.ReadLine())
System.Console.WriteLine("Entrer 2eme numéro")
nombre2 = System.Convert.ToInt32(System.Console.ReadLine())
multiplication = nombre1 * nombre2
System.Console.WriteLine("La multiplication est:")
System.Console.WriteLine(multiplication)
End Sub
End Module
Réponse:
Module Exercice6
Sub Main()
Dim nombre1 As Integer, nombre2 As Integer, nombre3 As Integer
Console.Write("Entrez le premier numéro à multiplier: ")
nombre1 = Convert.ToInt32(Console.ReadLine())
Console.Write("Entrez le deuxième nombre à multiplier: ")
nombre2 = Convert.ToInt32(Console.ReadLine())
Console.Write("Entrez le troisième nombre à multiplier: ")
nombre3 = Convert.ToInt32(Console.ReadLine())
Dim resultat As Integer = nombre1 * nombre2 * nombre3
Console.WriteLine("Résultat: {0} x {1} x {2} = {3}", nombre1, nombre2, nombre3, resultat)
End Sub
End Module
Réponse:
Module Exercice7
Sub Main()
Console.Write("Entrez un nombre: ")
Dim nombre1 As Integer = Convert.ToInt32(Console.ReadLine())
Console.Write("Entrez un autre numéro: ")
Dim nombre2 As Integer = Convert.ToInt32(Console.ReadLine())
Console.WriteLine("{0} + {1} = {2}", nombre1, nombre2, nombre1 + nombre2)
Console.WriteLine("{0} - {1} = {2}", nombre1, nombre2, nombre1 - nombre2)
Console.WriteLine("{0} x {1} = {2}", nombre1, nombre2, nombre1 * nombre2)
Console.WriteLine("{0} / {1} = {2}", nombre1, nombre2, nombre1 \ nombre2)
Console.WriteLine("{0} mod {1} = {2}", nombre1, nombre2, nombre1 Mod nombre2)
End Sub
End Module
Réponse:
Module Exercice8
Sub Main()
Dim num1 As Integer, num2 As Integer, num3 As Integer, num4 As Integer
Console.Write("Entrez le premier numéro: ")
num1 = Convert.ToInt32(Console.ReadLine())
Console.Write("Entrez le deuxième numéro: ")
num2 = Convert.ToInt32(Console.ReadLine())
Console.Write("Entrez le troisième numéro: ")
num3 = Convert.ToInt32(Console.ReadLine())
Console.Write("Entrez le numéro quatre: ")
num4 = Convert.ToInt32(Console.ReadLine())
Dim result As Integer = (num1 + num2 + num3 + num4) / 4
Console.WriteLine("la moyenne de {0}, {1}, {2}, {3}
est: {4} ", num1, num2, num3, num4, result)
End Sub
End Module
Réponse:
Module Exercice8
Sub Main()
Dim num1 As Integer, num2 As Integer, num3 As Integer
Console.Write("Entrez le premier numéro ...")
num1 = Convert.ToInt32(Console.ReadLine())
Console.Write("Entrez le deuxième numéro ....")
num2 = Convert.ToInt32(Console.ReadLine())
Console.Write("Entrez le troisième numéro ...")
num3 = Convert.ToInt32(Console.ReadLine())
Console.Write("Résultat de l'opération entre {0}, {1} et {2},
(a + b) · c est {3} et a · b + a · c est {4}",num1, num2, num3,
((num1 + num2) * num3), (num1 * num3 + num2 * num3))
End Sub
End Module
Réponse:
Module Exercice8
Sub Main()
Dim age As Integer
Console.Write("Entrer un âge")
age = Convert.ToInt32(Console.ReadLine())
Console.Write("Vous avez l'air plus jeune que {0}", age)
End Sub
End Module
Réponse:
Module Exercice8
Sub Main()
Dim x As Integer
Console.Write("Entrez un nombre:")
x = Convert.ToInt32(Console.ReadLine())
Console.WriteLine("{0}{0}{0}", x)
Console.WriteLine("{0} {0}", x)
Console.WriteLine("{0} {0}", x)
Console.WriteLine("{0} {0}", x)
Console.WriteLine("{0}{0}{0}", x)
End Sub
End Module
Réponse:
Module Exercice12
Sub Main()
Console.Write("Entrez le montant de Celsius:")
Dim celsius As Integer = Convert.ToInt32(Console.ReadLine())
Console.WriteLine("Kelvin = {0}", celsius + 273)
Console.WriteLine("Fahrenheit = {0}", celsius * 18 / 10 + 32)
End Sub
End Module
|
