Unidad 7
Calcular el seno (x) en c++
#incluide “stafx.h”
#incluide <iostream>
#incluide <math.h>
Using std :: cin;
Using std :: cout;
Using std :: endl;
Int_tmain (int argc, _tchar * argv)
{
Whi (true) {
Long doublé x= 0, fat, sen=0, y=0;
Int N= 0, i= 0, u=0, sig=-1;
Doublé a = 0, b = 0;
Fact= 1;
Cout<< “ingrese el número de repeticiones” <<endl; cin
>> x;
x= x+ 3.141618/ 180;
sen= x ;
doublé base = 0, exponente = 0, potencia = 0, potenciaz = 0;
for (i = 2; ic = N ; i ++){
fact = fact * (2 * i-1) * (2*i-2);
u= (2* i-1);
b = pow (x,u);
sen = sen + ((sig)*b) / fat ;
sig = -sig ;
}
Cout << “seno (x) calculado = “<<sencc endl ;
Cout << “seno (x) teorico = <<sin (x) << endl ;
Y= (sin (x) –sen ) / sin (x)
Cout<< “el valor absoluto (%) = “<<abs (y*100)
<<endl ;
Cout<< “está perfecto ponga 5” <<endl ;
}
Return 0,
}
Unidad 6:
Ejemplo 1:
Range ("C4"). Name:
Hace referencia al nombre del objeto Range que se encuentra en la celda C4.
Ejemplo 2:
Range("B7").Select:
Ejemplo 2:
Range("B7").Select:
Permite seleccionar y activar la celda B7 y ponerla a disposición para una operación.
Ejercicios Unidad 5
Ejemplifique varias diagonales sucesivas a través de la acumulación de texto,
con datos introducidos por teclado.
Private Sub CommandButton1_Click ()
Dim i As Interger
Dim j As Interger
Hoja1.Cells (1, 1) = "DICIEMBRE"
For i = 2 To 8
For j = 1 To i
If ((i + j) Mod 2) = 0 Then
Hoja1.Cells (i, j) = Hoja1. Cells (1, 1)
End If
Next j
Next i
End sub
Ejercicios de las Unidades 3 y 4
Realice un vector que
contenga los siguientes elementos: Nombre, apellido, edad y dirección, de 5
estudiantes.
Private Sub Command1_Click ( )
Datos Personales "Jonás " "Milano" "18” “sector centro”
Datos Personales "María" "Arzola" " 18” “el corozo”
Datos Personales "Héctor" "Peña" "20” “vipedi”
Datos Personales "Jennifer" "Gota" "19” “la florida”
Datos Personales "María" "Ribas" "19" “las industrias”
Print
End
Private Sub Command1_Click ( )
Datos Personales "Jonás " "Milano" "18” “sector centro”
Datos Personales "María" "Arzola" " 18” “el corozo”
Datos Personales "Héctor" "Peña" "20” “vipedi”
Datos Personales "Jennifer" "Gota" "19” “la florida”
Datos Personales "María" "Ribas" "19" “las industrias”
End
Realice y diseñe un
vector que muestre por pantalla los botones de una calculadora (Adición,
Sustracción, Multiplicación y División).
- Botón
Nuevo Cálculo:
Private Sub Command5_Click ( )
Text 1 = " "
Text 2 = " "
Text 3 = " "
Text 1, Setfocus
End Sub
Text 1 = " "
Text 2 = " "
Text 3 = " "
Text 1, Setfocus
End Sub
- Botón
Sumar:
Private Sub Command4_Click ( )
Text 3 = Val (Text 1) + Val (Text 2)
End Sub
Text 3 = Val (Text 1) + Val (Text 2)
End Sub
- Botón
Restar:
Private Sub Command3_Click ( )
Text 3 = Val (Text 1) - Val (Text 2)
End Sub
Text 3 = Val (Text 1) - Val (Text 2)
End Sub
- Botón
Multiplicar:
Private Sub Command2_Click ( )
Text 3 = Val (Text 1) * Val (Text 2)
End Sub
Text 3 = Val (Text 1) * Val (Text 2)
End Sub
- Botón
Dividir:
Private Sub Command1_Click ( )
Text 3 = Val (Text 1) / Val (Text 2)
End Sub
Text 3 = Val (Text 1) / Val (Text 2)
End Sub
