fork download
copy 
  1. Module constantsNenum
  2.    Sub Main()
  3.       Const PI = 3.14149
  4.       Dim radius, area As Single
  5.       radius = 7
  6.       area = PI * radius * radius
  7.       Console.WriteLine("Area = " & Str(area))
  8.       Console.ReadKey()
  9.    End Sub
  10. End Module
Success #stdin #stdout 0.08s 25688KB
comments (?)
stdin
copy 
Standard input is empty
stdout
copy 
Area =  153.933
https://ideone.com/NJDkZX
language:
VB.NET (mono-3.10)
created:
9 years ago
visibility:
public

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!