Datos personales

miércoles, 25 de marzo de 2015

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

No hay comentarios:

Publicar un comentario