esto me esta cansando

Corrección De La Prueba Parcial De Informática1.- Elabore un mapa conceptual sobre los objetos OLE
135296444036Objetos OLE
Objetos OLE

2020874493090827405208915Object Linking Embedding00ObjectLinking Embedding
207653321460200
77978030480Significa: Incrustar y enlazar objetos
00Significa: Incrustar y enlazar objetos

20840704381500398504219710Permite al editor realizar una parte deldocumento para posteriormente volver a vincular
0Permite al editor realizar una parte del documento para posteriormente volver a vincular

2084484184260
469900201930Se puede agregar al formularioarchivos de Word, Excel, Power Point, mp3 entre otros.
Se puede agregar al formulario archivos de Word, Excel, Power Point, mp3 entre otros.

2.- Realice un diagrama que permita el ingreso de ncantidades de estudiantes con sus edades, contar cuantos son mayores de edad y menores de edad. Mostrar nombres, edades y resultados por pantalla.
Dim X, Ed, Ma, Men As Double
Dim Nombre As StringPrivate Sub Command1_Click()X = Val(InputBox("Ingrese cantidad"))
For i = 1 To X
Nombre = InputBox("Ingrese nombre")
Ed = Val(InputBox("Ingrese edad"))
If Ed >= 18 Then
Ma = Ma + 1
Print Nombre;" tiene"; Ed; ". Es mayor de edad"
Else
Men = Men + 1
Print Nombre; " tiene"; Ed; ". Es menor de edad"
End IfNext i
End Sub
INICIO
N=0 May= 0
Nom= ” ”Men=0
Edad=0I=0
N
I=1,n,1Nom, EdadEd>=18
May=May+1
Men=Men+1
Nom, “tiene “ edad. “. Es menor de edad”
Nom, “tiene”, edad , “. Es mayor de edad”
iFin
INICIO
N=0 May= 0
Nom= ” ”Men=0
Edad=0I=0
N
I=1,n,1Nom, Edad
Ed>=18May=May+1
Men=Men+1
Nom, “tiene “ edad. “. Es menor de edad”
Nom, “tiene”, edad , “. Es mayor de edad”
iFin


3.- Elabore una aplicación en Visual Basic que permita mostrar por pantalla losprimeros 20 múltiplos de un número ingresado entre 5 y 10. Corregir Errores.
Dim x, y As Double
Private Sub Command1_Click()x = Val(InputBox("Escriba cantidad"))
If x >= 5 And x <= 10 Then...