Page 45 - ePB316_最佳案例 Visual Basic 2017 程式設計
P. 45

Chapter 03 │基本輸出入





                     範例 3-1a

                     請寫一個程式,可以輸入矩形的長與寬,並輸出周長與面積。


                    執行結果















                    程式列印


                     Module Module1
                         Sub Main()
                             Dim a, b, c, d As Short
                             Console.Write(" ሗ፩ɝॉҖٙڗ :")
                             a = Val(Console.ReadLine())
                             Console.Write(" ሗ፩ɝॉҖٙᄱ :")
                             b = Val(Console.ReadLine())
                             c = a * b
                             d = 2 * (a + b)
                             Console.Write(" ॉҖࠦጐމ :")
                             Console.WriteLine(c)
                             Console.Write(" ॉҖմڗމ :")
                             Console.WriteLine(d)
                         End Sub
                     End Module




                    動手做
                                                       x + y
                                                                 2
                                                                     2
                    x = 3、y = 4:請寫程式計算 x + y、               、 x  + y  的結果。
                                                       x – y
                     !  提示: 開根號的運算,除了可用次方(^)運算子外,亦可使用 Math.sqrt() 方法,
                              請自行線上查詢 Math。



                                                                                                            37
   40   41   42   43   44   45   46   47   48