Title: Diapositiva 1
1CLASE 3
- OBJETIVOS
- Iteración definida.
- Acumulador y Contador.
- Referencia
- Cap.2, documentos Cap2A.PDF, Cap2B.PDF
2- Repaso semanas 1, 2.
- Estructura de iteración definida FOR .. NEXT.
- ACUMULADOR y CONTADOR, y sus aplicaciones.
- Algunos ejemplos sumatoria (S), productoria (),
factorial. -
3Repaso semanas 1, 2
- Presentación del curso. Breve bosquejo de la
evolución de los computadores. - Algoritmo y su Representación.
- Estructuras automáticas básicas.
4Repaso semanas 1, 2
- Ejemplo de la ecuación cuadrática
Tarea1 Implementar la ecuación
cuadrática Tarea2 Elaborar algoritmo y proyecto
para hallar el mayor de tres valores A, B, C
SECUENCIA
- Datos de entrada A, B, C
- Proceso basado en
- Comparaciones lógicas se
- Compara cada valor con
- los otros dos.
5Solución 1 al problema al problema mayor de tres
valores A, B, C
If(A gt B)Then If( A gt C)Then T1A es el
mayor End If End If If(B gt A)Then If(B gt
C)Then T1B es el mayor End If End
If If(C gt A)Then If(C gt B)Then T1C es
el mayor End If End If
6Solución 2 al problema al problema mayor de tres
valores A, B, C
If(A gt B And A gt C)Then T1A es el
mayor Else If(B gt A And B gt C)Then
T1B es el mayor Else T1C es el
mayor End If End If
7Solución 3 al problema al problema mayor de tres
valores A, B, C
If(A gt B And A gt C)Then T1A es el
mayor End If If(B gt A And B gt C)Then
T1B es el mayor End If If(C gt A And C gt
B)Then T1C es el mayor End If
8Solución 4 al problema al problema mayor de tres
valores A, B, C
If(A gt B And A gt C)Then T1A es el
mayor ElseIf(B gt A And B gt C)Then T1B
es el mayor Else T1C es el mayor End
If
9Repaso semanas 1, 2
10Aspectos importantes del lenguaje de programación
- Definir variables Dim B As Single, N As Integer
- La definición de variables se puede hacer a
nivel de procedimiento o a nivel de formulario.
11Aspectos importantes del lenguaje de programación
- La función Val() B Val(Text2)
12Aspectos importantes del lenguaje de programación
- La función Str() Text4 Str(Suma)
13ESTRUCTURA FOR NEXT
FOR J 1 To 200 Step 15 . Next J
14ESTRUCTURA FOR NEXT
FOR J 1 To 200 Step 15 . Next J
15Sintaxis general FOR NEXT
For variable exp_inicio To exp_final Step incr
Acción 1 Acción 2 Acción n
Next variable
16Iteración definida FOR NEXT
- Si el incremento es unitario puede escribirse o
no For K 1 To N
Es lo mismo que For K 1 To N Step 1
- Si el incremento NO es unitario, hay que
escribirlo siempre
For X -10.0 To 10.0 Step 0.5 Next X
17FOR NEXT Ejemplo 1
- Elaborar un algoritmo para calcular la raíz
cuadrada de los primeros 100 números naturales
pares
For j 2 To 200 Step 2 Text1 j j
vbtab _ Sqr j ) Sqr(j) Next j
18FOR NEXT Ejemplo 1
19FOR NEXT Ejemplo 2
a p(1 r)n Donde n número de años P
capital invertido r tasa de interés anual a
cantidad de depósito al final del enésimo año.
- Una persona invierte un capital P al 5 anual,
en una cuenta de ahorros, durante n años.
Elaborar un algoritmo que calcule el saldo año
por año .
20FOR NEXT Ejemplo 2
P Val(Text1) r Val(Text2)/100 n
Val(Text3) For K 1 To n a P (1 r)K
Text4 Text4 K vbTab a vbcrlf Next K
21ACUMULADOR
- Para emular el proceso de acumulación se emplea
una asignación numérica como esta
SUMA SUMA X
- El signo igual significa asignación.
- El nuevo valor de SUMA es el anterior más el
valor de X.
- El acumulador se emplea para efectuar sumatorias,
productorias, factoriales
22ACUMULADOR
Variable Variable incremento
Siempre el efecto es el de una acumulación en la
variable
23ACUMULADOR EJEMPLO1
- Para la siguiente serie calcular la suma de los
N primeros términos, 1 lt X lt 2
24ACUMULADOR EJEMPLO1
25Multiplicador
- Análogamente, se puede tener una variable que
acumule pero en forma mutliplicativa, como en el
caso de una productoria o de un factorial.
Prod 1 For j 1 To N X
InputBox("Número", " LEER DATO ")
Prod Prod X Text2 Text2 j vbTab
X vbTab Prod vbCrLf Next j Text2
Text2 "______________________________"
vbCrLf _ "Productoria " Prod
26Multiplicador Ejemplo 1
27Factorial Ejemplo 1
N! productoria de los primeros N números
enteros N! 123...(N-1)N
28Contador Ejemplo 1
- Contador un acumulador con incremento unitario.
Emula el proceso de conteo.
- Para la serie dada a continuación calcular
cuántos términos se suman hasta que un término
sea menor o igual que 0.0000001 (un valor de
precisión), siendo 1 lt X lt 2
29Factorial Ejemplo 1
X Val(Text1) Suma X / 2 N 1 Eps
0.00000000000001 Do Fact 1.0 B 2 N
1 For M 1 To B Fact Fact M
Next M Ter ((-1)K)B(XB)/Fact N
N 1 Loop Until (Abs(Ter) lt Eps) Text2 No.
N
30GRACIAS
31Factorial Ejemplo 1