Visual Basic 2010

Rumus untuk  pemangkatan

1.     Rumus

Module modAssignment

Sub Main()
 Dim exponent As Integer ' power input by user
 Dim result As Integer ' number to raise to a power

 ' prompt user for exponent
 Console.Write("enter an base number: ")
 result = Console.ReadLine()

 Console.Write("Enter an integer exponent: ")
exponent = Console.ReadLine()
 
 result ^= exponent ' same as result = result ^ exponent
 Console.WriteLine("result ^= exponent: {0}", result)

 result = result ^ exponent
 Console.WriteLine("result = result ^ exponent: {0}", result)
 Console.ReadKey()

 End Sub ' Main
 End Module ' modAssignment

2.            Hasil / output

Setelah di run muncul gambar seperti ini              command prompt: akan muncul sebuah perintah yaitu :” enter an base number :” yang artinya ‘masukan angka dasar:’

Maka masukan angka yg anda inginkan

Misalkan anda masukan angka 4, maka hasilnya akan seperti gambar di bawah ini :

Ketika kita memasukan angka dasar 4, dan  pemangkatannya 3, maka program akan menghitung seperti berikut:

4³= 4 x 4 x 4 =64 , and than program akan bekerja kembali untuk pemangkatkan hasil yg tadi . jadi, ketika 4³ = 46, makan 46 akan di pangkatkan lagi dengan bilangan itu sendiri yaitu 46⁴⁶ =262144