Correlacion
Enviado por josebtito • 24 de Noviembre de 2012 • 417 Palabras (2 Páginas) • 260 Visitas
Sub correlacion()Dim i, j As IntegerDim a, b As StringFor i = 2 To 62b = CStr(Hoja1.Cells(i, 16))For j = 2 To 3849If CStr(Hoja1.Cells(j, 3)) = b ThenHoja1.Cells(j, 10) = Hoja1.Cells(i, 17)Hoja1.Cells(j, 11) = Hoja1.Cells(i, 18)Hoja1.Cells(j, 12) = Hoja1.Cells(i, 19)Hoja1.Cells(j, 13) = Hoja1.Cells(i, 20)End IfNext jNext iEnd Sub
#include <iostream>
#include <math.h>
#include <stdlib.h>
using namespace std;
int main()
{
system("title Calculadora v.1.0 by P43L0"); system("color 06");
double X;
{
cout << "\n-Advanced Calculator-\n\nElige operacion:\n\n";
cout << "\n1. Restar\n2. Sumar\n3. Dividir\n4. Multiplicar\n5. Raiz cuadrada\n6. Numero elevado a otro numero\n7. Porcentaje\n\n Trigonometria\n8. Seno del angulo\n9. Coseno del angulo\n10. Tangente\n\n Logaritmos\n11. Logaritmo natural\n12. Logaritmo decimal\n\nOpcion ";
cin >> X;
if(X == 1){
double restar1, restar2;
cout << "\nEscribe el primer digito: ";
cin >> restar1;
cout << "Escribe el segundo digito: ";
cin >> restar2;
cout << "El resultado de la resta es " << restar1 - restar2 << endl;
system("pause>nul");
}
if(X == 2){
double sumar1, sumar2;
cout << "\nEscribe el primer digito: ";
cin >> sumar1;
cout << "Escribe el segundo digito: ";
cin >> sumar2;
cout << "El resultado de la suma es " << sumar1 + sumar2 << "\n" << endl;
system("pause>nul");
}
if(X == 3) {
double diva, divb;
cout << "\nEscribe el dividendo: ";
cin >> diva;
cout << "Escribe el divisor: ";
cin >> divb;
cout << "El resultado de la división es " << diva / divb << endl;
system("pause>nul");
}
if(X == 4){
double multa, multb;
cout << "\nEscribe el primer digito: ";
cin >> multa;
cout << "Escribe el segundo digito: ";
cin >> multb;
cout << "El resultado de la multiplicacion es " << multa * multb << endl;
system("pause>nul");
}
if(X == 5){
double raizc;
cout << "\nEscribe el digito: ";
cin >> raizc;
cout << "La raiz cuadrada es " << sqrt(raizc) << endl;
system("pause>nul");
}
if(X == 6){
double ele1, ele2;
...