• Jueves 14 de Noviembre de 2024, 17:10

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 - accelerator

Páginas: [1]
1
Diseño de Algoritmos / Re: estructura de algoritmo for
« en: Martes 22 de Septiembre de 2009, 15:59 »
que bien explicado y detallado tu respuesta; quiero pedir disculpas si al principio malinterpreté el algoritmo, quizas, como muchos, no entienden bien la definicion exacta de un algoritmo; pero quiero decirte que tu respuesta me ayudó mucho en vb, sin embargo, en base a tus ejemplos, decidí usar una estructura creada unicamente por mi e hice lo que quizas yo llamo "algoritmo" jajaja como sigue a continuacion. Mucgas gracias por tu ayuda y tiempo, pido perdon si coloqué la duda en el post equivocado. No volverá a pasar. Gracias

Aui esta mi algoritmo final en vb:

 Dim num1, num2, total, contador As Double

        num1 = Me.txtnum1.Text
        num2 = Me.txtnum2.Text

        For contador = Me.txtnum1.Text To Me.txtnum2.Text
            MsgBox("contando... " & contador, MsgBoxStyle.Information)

            If Me.chksuma.Checked = True Then
                total = num1 + num2
                Me.txttotal.Text = total
            ElseIf Me.chkresta.Checked = True Then
                total = num1 - num2
                Me.txttotal.Text = total
            End If

        Next contador

a ver que tal gracias  :good:  :hola:

2
Diseño de Algoritmos / estructura de algoritmo for
« en: Domingo 20 de Septiembre de 2009, 04:43 »
Hola a todos tengan buen dia, soy nuevo en su comunidad y me parecio interesante asi que decidi unirme, espero poder estar activo la mayor parte del tiempo que pueda.
Bueno queria ir al punto de mi problema: estoy creando en visual studio 2008 3 ejemplos de algoritmos for y por el momento lo estoy haciendo en una calculadora sencilla que sume o reste dos numeros. El problema es a la hora de escribir el algoritmo for en pseudocodigo. Le doy doble clic al boton total que me mostrara el resultado de la suma y todo eso pero no se como implementar el codigo form, es decir no se que valor va en que lugar. Aqui les pongo el pseudocodigo me dicen el error para corregirlo. Gracias por su tiempo.

Private Sub btntotal_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btntotal.Click
        Dim num1, num2, total As Double

        num1 = Me.txtnum1.Text
        num2 = Me.txtnum2.Text
        total = Me.txttotal.Text

        For num1 as  0 & num2 > 0 = 1 to 10 step 1
            total = num1 + num2
            Me.txttotal.Text = total

        Next

    End Sub

Páginas: [1]