لاتنقر هنا

الجمعة، 24 أبريل 2015


Sub main()

Dim num1, num2, numsum As Integer

console.writeline ("input the firdt number?")
num1 = console.readline()

console.writeline ("input the second number?")
num2 = console.readline()

nnumsum = num1 + num2

console.writeline ("the sum =" & numsum)

End Sub
_________________________________________________________________________________
Module Module1

    Sub Main()
        Dim num1, num2, numsum As Integer

        Console.WriteLine("input the firdt number?")
        num1 = Console.ReadLine()

        Console.WriteLine("input the second number?")
        num2 = Console.ReadLine()

        numsum = num1 + num2
        Console.WriteLine(num1 & "+" & num2 & "=" & numsum)

        Console.ReadLine()

    End Sub

End Module

ليست هناك تعليقات:

إرسال تعليق