lunes, 1 de diciembre de 2014

Recopilación de Ejercicios de Programación y Método Numero

Ejercicios de la Unidad 3 y 4

1- Elabore y diseñe un vector que muestre por pantalla los botones de una calculadora "Suma, Resta, Multiplicación y División"


Botón de Nuevo Calculo.

Private  Sub Command 5_Click ( ).
      Text 1= "     "
      Text 2= "     "
      Text 3= "     "
      Text 1, set focus 
End Sub


Botón Sumar.

Private Sub Command1_ Click ( )
      Text 3= Val (Text 1) + Val (Text 2)
End Sub


Botón Restar

Private Sub Command2 _ Click ( )
      Text 3= Val (Text 1) - Val (Text 2)
End Sub



Botón Multiplicar

Private Sub Command3_ Click ( )
      Text 3= Val (Text 1) * Val (Text 2)
End Sub


Botón Dividir

Private Sub Command 4_ Click ( )
      Text 3= Val (Text 1) / Val (Text 2)
End Sub





2- Realice un vector que contenga los siguientes elementos: Nombre, apellido, dirección, sección y semestre de 5 estudiantes.

Private Sub Command1_Click ( )
Datos Personales "Denlizmar" "Rubin" "Guayabal" "Ing. P-4S" "D-01"
Datos Personales "Marianela" "Salazar" "Las Mercedes
" "Ing. P-4S" "D-01"
Datos Personales "Jennifer" "Vasquez" "Valle de la Pascua" "Ing. P-4S" "D-01"
Datos Personales "Mileidy" "Farramalla" "Valle de la Pascua" "Ing.M-4S" "D-01"
Datos Personales "Julio" "Hernández" "Altagracia de Orituco" "Ing.M-4S" "D-01"
 
Print
End



La siguiente figura pertenece al ejemplo del diseño de un formulario que se utiliza en la programación de microsoft visual basic:



3-Analice la Siguiente función, grafique y su resultado presentelo en la celda H3.


F(x)=Suma (A3:F3)/100




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) = "UNEFA" 
       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 


Unidad 6:
1:
Range ("C4"). Name:
Hace referencia al nombre del objeto Range que se encuentra en la celda C4.

Ejemplo 2:

Range("B7").Select:
Permite seleccionar y activar la celda B7 y ponerla a disposición para una operación. 

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,
}