ocho_ar

'Ingresar el diámetro de un círculo y devuelve su radio y área TextWindow.Write("Ingresar el diámetro del círculo: " ) dia=TextWindow.Read() ra=dia/2 ar=(ra*ra)*Math.Pi TextWindow.Write("El radio del círculo es: " ) TextWindow.WriteLine(ra) TextWindow.WriteLine(" " ) TextWindow.WriteLine(" " ) TextWindow.WriteLine(" " ) TextWindow.WriteLine("El área del círculo es de: " ) TextWindow.Write(ar) TextWindow.WriteLine(" " ) TextWindow.WriteLine(" " ) TextWindow.WriteLine(" " )

Muestra una una ventana con colores definidos GraphicsWindow.BackgroundColor="Gray"'Fondo gris GraphicsWindow.Title="Programa en SmallBasic"'título GraphicsWindow.Width=400'ancho GraphicsWindow.Height=100'alto GraphicsWindow.Show()'muestra la pantalla GraphicsWindow.BrushColor="Yellow"'letras amarillas GraphicsWindow.DrawText(10,10,"Bienvenido al mundo de la programación en SmallBasic" ) 'texto dentro de la ventana