diseño de la araña

número mayor

dinosaurio:
TextWindow.WriteLine("ingresa el primer numero")
f = TextWindow.ReadNumber()
TextWindow.WriteLine("ingresa el segundo numero")
k = TextWindow.ReadNumber()
TextWindow.WriteLine("ingresa el tercer numero")
s = TextWindow.ReadNumber()
If f = k Or  f = s Or k = s Then
  TextWindow.WriteLine("No ingreses numeros iguales")
  Goto  dinosaurio
Else
  If f > k And f > s Then
    TextWindow.WriteLine("El numero mayor es: " + f)
  Else
    If k > f  And  k > s Then
      TextWindow.WriteLine("El numero mayor es: " + k)
    Else
      If k > f And s > k Then
        TextWindow.WriteLine("El numero mayor es: " + s)
      EndIf
      EndIf
  EndIf
EndIf

temperatura FAHRENHEIT

TextWindow.WriteLine("Ingresa la temperatura en grados fahrenheit")
s = TextWindow.ReadNumber()
If s > 85 Then
  TextWindow.WriteLine("El deporte que se puede practicar es Natacion")
Else
  If s >70 And s <=85 Then
    TextWindow.WriteLine("El deporte que se puede practicar es Tenis")
  Else
    If s <=70 And s >32 Then
      TextWindow.WriteLine("El deporte que se puede practicar es Golf")
    Else
      If s <=32 and s >10 Then
        TextWindow.WriteLine("El deporte que se puede practicar es Esqui")
      Else
        If s <=10 Then
          TextWindow.WriteLine("No se recomienda hacer deporte")
        EndIf
      EndIf
    EndIf
  EndIf

small-basic: programa de descuento dependiendo de la compra.

TextWindow.WriteLine("ingresa el monto")
s= TextWindow.ReadNumber()
If s <= 500 Then
  TextWindow.WriteLine("No hay descuento")
Else
  If s>500 And s<1000 Then
    TextWindow.WriteLine(" 5 % descuento")
  Else
    If s > 1000 And s<=7000 Then
      TextWindow.WriteLine("13 % descuento")
    Else
      If s>7000 And s<=15000 Then
        TextWindow.WriteLine("18% descuento")
      Else
        If s>15000 Then
          TextWindow.WriteLine("25% de descuento")
        EndIf
         EndIf
  EndIf
EndIf
  EndIf

programa de small-basic: OPERACIÓN: (A - B) / C VALIDAR EL VALOR DE C NO SEA CERO.

2. DADOS LOS DATOS A, B, C, QUE DEBEN SER NÚMEROS ENTEROS, SE CALCULE EL RESULTADO DE LA SIGUIENTE OPERACIÓN: (A - B) / C
VALIDAR EL VALOR DE C NO SEA CERO


TextWindow.WriteLine("ingrese un valor")
s= TextWindow.ReadNumber()
TextWindow.WriteLine("ingresa el segundo valor")
g= TextWindow.ReadNumber()
dinosaurio:
TextWindow.WriteLine("ingresa el tercer valor")
k= TextWindow.ReadNumber()
If k= 0 Then
  TextWindow.WriteLine("introduce un numero que no sea cero")
  Goto dinosaurio
Else
  TextWindow.WriteLine("El resultado de la operacion es : " + s*g/k)
  EndIf

small-basic: Horario de clases.

materias:
es = "español"
ma = "matematicas"
ar = "artes"
Fo = "formacion"
ci = "ciencias"
in = "ingles"
ta = "informatica"
hi = "historia"
ef = "E. fisica"
tu = "tutoria"
date = Clock.Date
TextWindow.WriteLine("dias: Lunes, Martes, Miercoles, Jueves, viernes")
TextWindow.WriteLine("modulos: 1, 2, 3, 4, 5, 6, 7, 8 ")
boing:
TextWindow.WriteLine("escribe el dia que deseas")
day = TextWindow.Read()
post:
TextWindow.WriteLine("escribe el modulo")
hour = TextWindow.ReadNumber()
'validar que no puedas usar el sabado y el domingo'
if ( day = "sabado" Or "Sabado")Then
  TextWindow.WriteLine("hoy no tienes clases,(escoge un dia valido)")
  Goto boing
Else
  TextWindow.WriteLine("")
EndIf
If (day = "Domingo" Or "domingo")Then
  TextWindow.WriteLine("hoy no tienes clases,(escoge un dia valido)")
  Goto boing
Else
  TextWindow.WriteLine("")
EndIf
'validar que solo se use del 1 al 8 modulo'
If (hour >0 And hour <9)Then
  TextWindow.WriteLine("")
Else
  TextWindow.WriteLine("modulo incorrecto seleccione modulo del 1:8")
  Goto post
EndIf
lunes: 
  If (day = "lunes" Or day="Lunes")Then
    If (hour = 1)Then
      TextWindow.WriteLine("hoy :" + date + " tu clase es: " + es)
    Else
      TextWindow.WriteLine("")
    EndIf
    If (hour = 2)Then
      TextWindow.WriteLine("hoy :" + date + " tu clase es: " + ma)
    Else
      TextWindow.WriteLine("")
    EndIf
    If (hour = 3)Then
      TextWindow.WriteLine("hoy :" + date + " tu clase es: " + ta)
    Else
      TextWindow.WriteLine("")
    EndIf
    If (hour = 4)Then
      TextWindow.WriteLine("hoy :" + date + " tu clase es: " + ar)
    Else
      TextWindow.WriteLine("")
    EndIf
     If (hour = 5)Then
      TextWindow.WriteLine("hoy :" + date + " tu clase es: " + Fo)
    Else
      TextWindow.WriteLine("")
    EndIf
    If (hour = 6)Then
      TextWindow.WriteLine("hoy :" + date + " tu clase es: " + ci)
    Else
      TextWindow.WriteLine("")
    EndIf
    If (hour = 7)Then
      TextWindow.WriteLine("hoy :" + date + " tu clase es: " + in)
    Else
      TextWindow.WriteLine("")
    EndIf
    If (hour = 8)Then
      TextWindow.WriteLine("hoy :" + date + " tu clase es: " + ta)
    Else
      TextWindow.WriteLine("")
    EndIf
  Else
    TextWindow.WriteLine("")
  EndIf
 
 
  martes: 
    If (day = "martes" Or day="Martes")Then
    If (hour = 1)Then
      TextWindow.WriteLine("hoy :" + date + " tu clase es: " + ta)
    Else
      TextWindow.WriteLine("")
    EndIf
    If (hour = 2)Then
      TextWindow.WriteLine("hoy :" + date + " tu clase es: " + ta)
    Else
      TextWindow.WriteLine("")
    EndIf
    If (hour = 3)Then
      TextWindow.WriteLine("hoy :" + date + " tu clase es: " + es)
    Else
      TextWindow.WriteLine("")
    EndIf
    If (hour = 4)Then
      TextWindow.WriteLine("hoy :" + date + " tu clase es: " + ef)
    Else
      TextWindow.WriteLine("")
    EndIf
     If (hour = 5)Then
      TextWindow.WriteLine("hoy :" + date + " tu clase es: " + fo)
    Else
      TextWindow.WriteLine("")
    EndIf
    If (hour = 6)Then
      TextWindow.WriteLine("hoy :" + date + " tu clase es: " + ci)
    Else
      TextWindow.WriteLine("")
    EndIf
    If (hour = 7)Then
      TextWindow.WriteLine("hoy :" + date + " tu clase es: " + ma)
    Else
      TextWindow.WriteLine("")
    EndIf
    If (hour = 8)Then
      TextWindow.WriteLine("hoy :" + date + " tu clase es: " + hi)
    Else
      TextWindow.WriteLine("")
    EndIf
  Else
    TextWindow.WriteLine("")
  EndIf
 
 
  miercoles:
  If (day = "miercoles" Or day ="Miercoles")Then
    If (hour = 1)Then
      TextWindow.WriteLine("hoy :" + date + " tu clase es: " + ta)
    Else
      TextWindow.WriteLine("")
    EndIf
    If (hour = 2)Then
      TextWindow.WriteLine("hoy :" + date + " tu clase es: " + ta)
    Else
      TextWindow.WriteLine("")
    EndIf
    If (hour = 3)Then
      TextWindow.WriteLine("hoy :" + date + " tu clase es: " + ef)
    Else
      TextWindow.WriteLine("")
    EndIf
    If (hour = 4)Then
      TextWindow.WriteLine("hoy :" + date + " tu clase es: " + hi)
    Else
      TextWindow.WriteLine("")
    EndIf
     If (hour = 5)Then
      TextWindow.WriteLine("hoy :" + date + " tu clase es: " + Fo)
    Else
      TextWindow.WriteLine("")
    EndIf
    If (hour = 6)Then
      TextWindow.WriteLine("hoy :" + date + " tu clase es: " + in)
    Else
      TextWindow.WriteLine("")
    EndIf
    If (hour = 7)Then
      TextWindow.WriteLine("hoy :" + date + " tu clase es: " + es)
    Else
      TextWindow.WriteLine("")
    EndIf
    If (hour = 8)Then
      TextWindow.WriteLine("hoy :" + date + " tu clase es: " + ma)
    Else
      TextWindow.WriteLine("")
    EndIf
  Else
    TextWindow.WriteLine("")
  EndIf
 
 
  jueves:
  If (day = "jueves" Or day ="Jueves")Then
    If (hour = 1)Then
      TextWindow.WriteLine("hoy :" + date + " tu clase es: " + ma)
    Else
      TextWindow.WriteLine("")
    EndIf
    If (hour = 2)Then
      TextWindow.WriteLine("hoy :" + date + " tu clase es: " + es)
    Else
      TextWindow.WriteLine("")
    EndIf
    If (hour = 3)Then
      TextWindow.WriteLine("hoy :" + date + " tu clase es: " + ta)
    Else
      TextWindow.WriteLine("")
    EndIf
    If (hour = 4)Then
      TextWindow.WriteLine("hoy :" + date + " tu clase es: " + ta)
    Else
      TextWindow.WriteLine("")
    EndIf
     If (hour = 5)Then
      TextWindow.WriteLine("hoy :" + date + " tu clase es: " + Fo)
    Else
      TextWindow.WriteLine("")
    EndIf
    If (hour = 6)Then
      TextWindow.WriteLine("hoy :" + date + " tu clase es: " + ar)
    Else
      TextWindow.WriteLine("")
    EndIf
    If (hour = 7)Then
      TextWindow.WriteLine("hoy :" + date + " tu clase es: " + hi)
    Else
      TextWindow.WriteLine("")
    EndIf
    If (hour = 8)Then
      TextWindow.WriteLine("hoy :" + date + " tu clase es: " + tu)
    Else
      TextWindow.WriteLine("")
    EndIf
  Else
    TextWindow.WriteLine("")
  EndIf
 
  viernes: 
  If (day = "viernes" Or day ="Viernes")Then
    If (hour = 1)Then
      TextWindow.WriteLine("hoy :" + date + " tu clase es: " + ci)
    Else
      TextWindow.WriteLine("")
    EndIf
    If (hour = 2)Then
      TextWindow.WriteLine("hoy :" + date + " tu clase es: " + ma)
    Else
      TextWindow.WriteLine("")
    EndIf
    If (hour = 3)Then
      TextWindow.WriteLine("hoy :" + date + " tu clase es: " + ta)
    Else
      TextWindow.WriteLine("")
    EndIf
    If (hour = 4)Then
      TextWindow.WriteLine("hoy :" + date + " tu clase es: " + ta)
    Else
      TextWindow.WriteLine("")
    EndIf
     If (hour = 5)Then
      TextWindow.WriteLine("hoy :" + date + " tu clase es: " + in)
    Else
      TextWindow.WriteLine("")
    EndIf
    If (hour = 6)Then
      TextWindow.WriteLine("hoy :" + date + " tu clase es: " + ci)
    Else
      TextWindow.WriteLine("")
    EndIf
    If (hour = 7)Then
      TextWindow.WriteLine("hoy :" + date + " tu clase es: " + hi)
    Else
      TextWindow.WriteLine("")
    EndIf
    If (hour = 8)Then
      TextWindow.WriteLine("hoy :" + date + " tu clase es: " + es)
    Else
      TextWindow.WriteLine("")
    EndIf
  Else
    TextWindow.WriteLine("")
  EndIf
 
  TextWindow.WriteLine("desea realizar el programa de nuevo")
  dory = TextWindow.Read()
  If (dory= "si" Or "Si")Then
    Goto  materias

small-basic: Programa que calcule e imprima el número de segundos que hay en un determinado número de días.

TextWindow.WriteLine("cuantos días quieres saber los segundos")

a = TextWindow.ReadNumber()

 s= (a*24)

TextWindow.WriteLine("Los segundos son: " + 60*60*s)