Visual Basic - While, do while , do while loop

Life is soft - evento anual de software empresarial
 
Vista:

While, do while , do while loop

Publicado por Doris Villaverde (1 intervención) el 03/06/2017 13:34:14
Hola me podrían ayudar a resolver esos problemas mediante while, do while, do until , do while loop en Visual Básic


1.Encontrar tres números enteros A; B; C, todos mayores que 2, tales que
A3 + B3 = C3 + 1
2.Un número es super impar si todas sus cifras son impares. Ejemplo: 1395. Haga un programa que lea un número e imprima si el número es un super impar.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
Imágen de perfil de Andres Leonardo
Val: 3.117
Oro
Ha mantenido su posición en Visual Basic (en relación al último mes)
Gráfica de Visual Basic

While, do while , do while loop

Publicado por Andres Leonardo (1798 intervenciones) el 05/06/2017 16:00:23
para mi en el primer punto deberia haber algo mas .. po rque no dicen las reglas de ABC entonces ABC puden ser recorridos al Infinito
asi como no dice si b=A+1 o algo paa limitar las combinaciones..... para mi falta algo

pero en el b seria asi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Private Sub Command1_Click()
 
A = Text1.Text ' ( 1935)
s = True
For i = 1 To Len(A)
X = Abs(Mid(A, i, 1))
   If X Mod 2 = 0 Then s = False
Next i
 
If s = True Then
    MsgBox "SuperImpar"
Else
    MsgBox " No SuperImpar"
End If
End Sub
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar