Contact: aviboots(AT)netvision.net.il
39,888 questions
51,815 answers
573 users
Module Module1 Sub Main() Const PI = 3.14 Dim radius, area As Single radius = 13 area = PI * radius * radius Console.WriteLine("Area = {0}", area) End Sub End Module ' run: ' ' Area = 530.66