UNIDAD 1

 Actividad 1

Ordenar escritorio de Windows y carpetas 









Actividad 2

Como ver el Hardware de la Computadora.

1-° DirectX 

" Win+ R escribir dxdiag " 

        

2-° Configuración y administrador de dispositivos. 

Acceder al menú inicio y seleccionar configuración posteriormente sistema después nos posicionamos en la parte izquierda y bajamos hasta el apartado "acerca de".

                                                                                                                    

3-° En el explorador de archivos.

"en la barra lateral izquierda en "este equipo " damos click derecho y seleccionamos propiedades" 

 


4-° Símbolo del sistema.

 en la barra de búsqueda escribimos "Símbolo del sistema" y ejecutamos como administrador e ingresamos el comando "systeminfo".


5-° Barra de búsqueda de windows.  

en la barra de busqueda escribimos "Acerca de tu PC " y damos click 

  

6-° Administrador de tareas.
En la barra de busqueda escribimos "administrador de tareas o presionando CTRL +Alt+Supr.

7-°  Xbox Game bar.

presionando Win+ G


Actividad 3








Actividad 4

 


Actividad 5


Actividad 6



Actividad 7



Actividad 8



Actividad 9

Ejercicio 1
Determinar si un alumno aprueba ó reprueba un curso, sabiendo que aprobara si su promedio de cinco calificaciones es igual o mayor a 6; reprueba en caso contrario.
 
Algoritmo calificacion
//Determinar si un alumno aprueba ó reprueba un curso
// si su promedio de cinco calificaciones es igual o mayor a 6
definir a,b,c,d,e ,promedio como real
escribir "escribe las Cinco calificaciones:"
leer a,b,c,d,e
promedio=(a+b+c+d+e) /5
si promedio>= 6 Entonces
escribir "tu promedio es:" ,promedio," Aprobado"
sino 
escribir "Tu promedio es:" ,promedio," REPROBADO"
FinSi

FinAlgoritmo

  





                                                                           
Ejercicio 2
En una tienda de conveniencia se aplica el 30% de descuento a los clientes que hagan una compra mayor a $5,000 MX ¿Cuál será la cantidad de dinero que pagará una persona por su compra?

Algoritmo tienda
//calcular monto de una compra mayor a $5,000 MXN 
//con un descuento del 30%
//y saber cuanto pagara la persona por su compra
Escribir "ingrese precio de los productos"
leer precio 
escribir "ingrese cantidad de productos a compra:"
leer cantidad 
compra<- precio * cantidad
escribir "Total a pagar:" ,compra
descuento<-compra*0.30
escribir "descuento de:" ,descuento
compra<-compra-descuento
escribir "total con descuento aplicado:" ,compra
FinAlgoritmo







Actividad 10 

Elabore un programa que pida una calificación entre el 70 y 100 

Algoritmo calif
cal=0;
escribir "dame la calificacion"
leer cal
Si cal>=70 y cal<=100 Entonces
escribir "Calificacion valida"
SiNo
escribir "calificacion no valida"
Fin Si
// dar una calificacion hasta que sea valida.
Escribir "******************************"
Repetir
escribir "dame la calificacion"
leer cal
Hasta Que cal>=70 y cal<=100
FinAlgoritmo




Comentarios

Publicar un comentario

Entradas más populares de este blog

UNIDAD 4

Imagen
 Actividad 1 Insertar ventana de color usando " Userform" Private Sub UserForm_Initialize() Me.BackColor = vbBlue End Sub Actividad 2 Insertar botón para ventana personalizada Private Sub CommandButton1_Click() UserForm1.Show End Sub Actividad 3 botón de ventana de mensaje Private Sub CommandButton2_Click() MsgBox "Hola, como te va?" End Sub Actividad 4 boton de mensaje de exclamación Private Sub CommandButton3_Click() MsgBox "seguimos!", vbExclamation End Sub Actividad 5 Mensaje con titulo "vamos estudiantes" Private Sub CommandButton4_Click() MsgBox "Vamos estudiantes", vbYesNo, "programacion electrica" End Sub Actividad 6  Mensaje de si o no Private Sub CommandButton5_Click() MsgBox "Mighty Chase", vbYesNo + vbExclamation, "Electrica" End Sub Actividad 7 Pintar una celda Private Sub CommandButton6_Click() Dim res As Variant res = MsgBox("¿Quieres pintar de rojo A1?", vbYesNo, "Colorear A1...
Leer más

UNIDAD 3

Imagen
 Actividad 1 Operaciones Aritméticas ejemplo "Hola" Sub op_aritmetico() Cells(1, 1) = "hola" Range("B2") = "Tu" Range("A2:A5") = " Hola UwU" End Sub Actividad 2 Aritméticas "Suma, resta,multiplicación, división y producto" Sub aritmeticas() Dim num1 As Integer Dim num2 As Integer num1 = 5 num2 = 7 Cells(1, 1) = num1 + num2 'suma Cells(1, 2) = "suma" Cells(2, 1) = num2 - num1 'resta Cells(2, 2) = "resta" Cells(3, 1) = num1 * num2 'multiplicacion Cells(3, 2) = "multiplicacion" Cells(4, 1) = num2 / num1 'division Cells(4, 2) = "Division" Cells(5, 1) = num1 ^ 2 'potencia Cells(5, 2) = "potencia" Cells(6, 1) = num2 \ num1 'division entera Cells(6, 2) = "Division entera" Cells(7, 1) = num2 Mod num1 'residuo Cells(7, 2) = "Residuo" End Sub Actividad 3 función lógicos Sub logicos() Dim n1 As Integer Dim n2 As Integer n1 = 5 ...
Leer más