RosettaCodeData/Task/Arithmetic-Integer/Visual-Basic-.NET/arithmetic-integer.vb

15 lines
376 B
VB.net
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
Imports System.Console
Module Module1
Sub Main
Dim a = CInt(ReadLine)
Dim b = CInt(ReadLine)
WriteLine("Sum " & a + b)
WriteLine("Difference " & a - b)
WriteLine("Product " & a - b)
WriteLine("Quotient " & a / b)
WriteLine("Integer Quotient " & a \ b)
WriteLine("Remainder " & a Mod b)
WriteLine("Exponent " & a ^ b)
End Sub
End Module