• Martes 21 de Mayo de 2024, 17:38

Mostrar Mensajes

Esta sección te permite ver todos los posts escritos por este usuario. Ten en cuenta que sólo puedes ver los posts escritos en zonas a las que tienes acceso en este momento.


Mensajes - vemv91

Páginas: [1]
1
VB .NET / Re: Qué habríais usado en lugar de GoTo?
« en: Jueves 27 de Mayo de 2010, 13:14 »
no conocía esa palabra clave, me ha gustado la idea.

declarar una variable auxiliar no dista tanto de un GoTo diría...

gracias y un saludo

2
VB .NET / Qué habríais usado en lugar de GoTo?
« en: Domingo 23 de Mayo de 2010, 17:24 »
Aquí un programa que pregunta la tabla de multiplicar.

Código: vb.net
  1.  
  2.         Dim T As Integer ' Número del que se pide la tabla
  3.         Dim M As Integer ' Número de la tabla por el que se va a multiplicar
  4.         Dim R As String ' Respuesta del usuario
  5.         T = 1
  6.         M = 2
  7.  
  8.         Do ' Actualiza la tabla
  9.             T += 1
  10.             M = 2
  11.             Do ' Actualiza el número de la tabla por el que se va a multiplicar
  12. line14:         ' GOTO
  13.                 Console.WriteLine(T & " por " & M)
  14.                 R = Console.ReadLine()
  15.                 If IsNumeric(R) Then
  16.                     R = CInt(R)
  17.                 Else : GoTo line14 ' GOTO
  18.                 End If
  19.                 If R = T * M Then
  20.                     Console.WriteLine("Correcto")
  21.                     M += 1
  22.                 Else
  23.                     Console.WriteLine("Incorrecto. Pulse una tecla para continuar")
  24.                     Console.ReadLine()
  25.                 End If
  26.             Loop While M < 10
  27.         Loop While T < 10
  28.         Console.WriteLine("Felicidades; te sabes la tabla de multiplicar. Pulsa una tecla para continuar")
  29.         Console.ReadLine()
  30.  
  31.  

Pues eso, me falla un pelín la lógica para evitar el temido GoTo, ¿cómo lo habríais hecho vosotros?

Un saludo. ;)

3
Visual Basic 6.0 e inferiores / Re: 0.99 \ 1 = 1. WTF?
« en: Lunes 19 de Abril de 2010, 19:02 »
Qué tal chiquilla ;)

Bueno, probablemente el error es mío por esperar que un operador se comporte del modo que a mí me parece razonable.
Porque lo que quiero es ciertamente particular: una división "con resto" incluso entre dos números decimales, tipo 1.45 entre 0.105. Me temo que el código que has adjuntado sirve más bien para redondear...

El código que terminé escribiendo es éste.

Código: Text
  1.  
  2.         Dim Dividendo As Double
  3.         Dim Divisor As Double
  4.         Dim Operando As Double
  5.         Dim Contador As Integer
  6.         Dim Resto As Double
  7.         Dividendo = txtDividendo.Text
  8.         Divisor = txtDivisor.Text
  9.         If Divisor = 0 Then
  10.             Contador = 0
  11.             Resto = 0
  12.         ElseIf Divisor > Dividendo Then
  13.             Contador = 0
  14.             Resto = Dividendo
  15.         ElseIf Dividendo = Divisor Then
  16.             Contador = 1
  17.             Resto = 0
  18.         ElseIf Divisor + Divisor > Dividendo Then
  19.             Contador = 1
  20.             Resto = Dividendo - Divisor
  21.         Else
  22.             Operando = Divisor
  23.             Contador = 1
  24.             Do
  25.                 Operando += Divisor
  26.                 Contador += 1
  27.             Loop While Operando + Divisor <= Dividendo
  28.             Resto = Dividendo - Operando
  29.  
  30.         End If
  31.         lblResul.Text = "Cociente = " & Contador & ", resto = " & Resto
  32.  

Funciona bien por ejemplo con 8 entre 0.5 (16 exacto) pero entre 0.2 me da 0.1999999999996.
Le encontráis explicación a esto? Gracias y un saludo ;)

4
Python / ¿Qué gano con Python?
« en: Sábado 17 de Abril de 2010, 14:30 »
Hola, qué tal. Tengo nociones básicas de VB y Java, pero el lenguaje que usan tres compañeros de clase (grado medio... nada especial) es Python, no estaría mal poder compartir personalmente conocimientos y experiencias :)
Sólo me preguntaba qué ventajas propociona en la práctica con este lenguaje. Así de primeras siento que es muy flexible, y entre sus características veo que se suele destacar la claridad. Eso no me importaría tanto como las aplicaciones prácticas que se puedan desarrollar con Python.
Quiero decir, hay determinado segmento de aplicaciones que sólo se suelan desarrollar con él o en el que sea mucho más adecuado, al menos?

Ésa es mi duda. Gracias por adelantado y un saludo ;)

5
Visual Basic 6.0 e inferiores / 0.99 \ 1 = 1. WTF?
« en: Domingo 4 de Abril de 2010, 19:39 »
Hola, este es mi primer post.

Vamos a ver... escribo un programita con un label y un botón. El botón contiene este código para el evento click:

Label1.Text = 0.99  1

Esta división *entera* me da como resultado en el label 1. Me parece que este operador redondea (!), porque esto no sucede con 0.4  1 por ejemplo. Hay algo que debería saber?

Gracias por adelantado  :beer:

Páginas: [1]