1.- Diseñar diagrama de flujo para el programa que imprima tres números:
Inicio
A=3

X= A+B+C
C=1
FIN
B=5
X

Private Sub BtnSuma_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnSuma.Click Dim Dato1, Dato2, Dato3 As Single Dato1 = Single.Parse(TextBox1.Text) Dato2 = Single.Parse(TextBox2.Text) Dato3 = Single.Parse(TextBox3.Text) LblSuma.Text = Dato1 + Dato2 + Dato3
End Sub
2.- Diseñar diagrama de flujo para el programa que imprima la multiplicación de dos números.
X= A*B
FIN
X
B=5
A=3
Inicio

Private Sub BtnMultiplicar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnMultiplicar.Click Dim Dato1, Dato2 As …ver más…

NO SI

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim a, c As Integer a = 10 For c = a To 50 Step +2 ListBox1.Items.Add((c)) Next End Sub

A=A-2
A=10
A
A=100
Inicio
10.- Diseñar diagrama de flujo para el programa que imprima todos los números pares del 100 al 10 y todos los números terminados en 3 del 100 al 3.

FIN

SI
A=3

B=B-10
B
B= A -7 NO SI

NO

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim a, b, c As Integer a = 100 b = 93 For c = a To 10 Step -10 ListBox1.Items.Add((c)) Next For c = b To 3 Step -10 ListBox2.Items.Add((c)) Next

End Sub

11.- Diseñar diagrama de flujo para el programa que imprima la serie fibbonaci. A=1
Inicio

B=0

C= A+B

A=C
C

B=A
FIN
C > 100

NO SI

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As