3) Calcular el número de pulsaciones que debe tener una persona por cada 10 segundos de ejercicio aeróbico; la formula que se aplica cuando el sexo es femenino es: núm. pulsaciones = (220 - edad) / 10 y si el sexo es masculino la fórmula es: núm. pulsaciones = (210 - edad) / 10

Module Module1

Sub Main()
Dim edad, num_puls As Integer
Dim sexo As String
Console.WriteLine("Digite sexo")
sexo = Console.ReadLine()
Console.WriteLine("Digite edad")
edad = Console.ReadLine()
If sexo = "femenino" Then
num_puls = (220 - edad) / 10
Console.WriteLine("El numero de pulsaciones es:" & num_puls)
Console.ReadLine()
Else
If sexo = "masculino" Then
num_puls = (210 - edad) / 10
Console.WriteLine("El numero de pulsaciones es:" & num_puls)
Console.ReadLine()
End If
End If


End Sub

End Module