Ejercicios Algoritmos Calcular el cociente y residuo de la división de dos números A y B

[pic 1]

[pic 2]

1. Calcular el cociente y residuo de la división de dos números A y B

// Algoritmo para Calcular el Cociente (C) y Residuo (R) de A entre B.

Proceso Calcular_Cociente_Residuo //Proceso

Escribir "Programa para calcular el Cociente (C) y el Residuo (R) de A entre B";

Escribir "Ingrese el valor de A: ";

Leer A; //ingresa por teclado el valor de A

Escribir "Ingrese el valor de B: ";

Leer B; //ingresa por teclado el valor de B

Cociente<-A/B; //Cociente

Residuo<-A Mod B; //Residuo ; emplear la función Mod

Escribir "El cociente(C) de A entre B es:", " ",Cociente;

Escribir "El residuo(R) de A entre B es: ", " ",Residuo;

Finproceso

2. Determinar el mayor de dos números ‘a’ y ‘b’

//Algoritmo que determina el mayor de dos números 'a' y 'b'.

Proceso mayor_que //proceso mayor_que

Escribir "Algoritmo para calcular cual numero de a y b es mayor";

Escribir "Introduzca el valor de a: " //muestra en pantalla la instrucción

Leer a; //ingresa por teclado el valor de 'a'

Escribir "Introduzca el valor de b: "

Leer b;

a<-a; // a=a; si escribieramos a=0, la comparación sería entre ceros (error)

b<-b; // idem al anterior

Si a>b Entonces //Condicional Si (If) a>b Entonces que?

Escribir "El número a=", " ", a, "es mayor que b=", " ", b;

        Sino

Escribir "El número b=", " ", b, "es mayor que a=", " ", a;

        Finsi

Finproceso

3. Algortimo para calcular el tiempo transcurrido entre dos horas H-1 y H-2.

Proceso Calcular_tiempo_dos_horas

        Escribir "Programa para clacular el Tiempo transcurrido entre dos horas";

        Escribir "Hora-1 (h1, m1)"; //H-1 expresado en Horas:minutos

        Leer h1; //introduce h1 por teclado

        Leer m1; //introduce m1 por teclado

        Escribir "Hora-2 (h2, m2)";

        Leer h2;

        Leer m2;

        dh<-(h2-h1); //operador diferencia_horas

        dm<-(m2-m1); //operador diferencia_minutos

        Si dh<0 Entonces //si dh es negativo (<0) volver positivo

                dh<-(-1*dh) // multiplicar por -1

        Sino

                dh<-dh // dh>0 positivo, no se 'hace ninguna operación'

        FinSi

        Si dm<0 Entonces //idem a la línea 12

                dm<-(-1*dm) //idem a la línea 13

        Sino

                dm<-dm //idem a la linea 15

        FinSi

        Escribir "La El tiempo trascurrido entre H-1 y H-2 es: ", dh, " horas ", dm, " minutos ";

FinProceso

4. Calculo del promedio de una lista de 'N' números

// Calculo del promedio de una lista de 'N' números

Proceso Promedio

        Escribir "Ingrese la cantidad de datos";

        Leer N;

        acum<-0;

        Para i<-1 Hasta N Hacer

                Escribir "Ingrese el dato ",i,":";

                Leer dato;

                acum<-acum+dato;

        FinPara

        prom<-acum/N

        Escribir "El promedio es: ", prom;

FinProceso

5. Algoritmo que pide ingresar un nº del 0-9 empleando Según-Hacer

// Algoritmo que pide ingresar un nº del 0-9 empleando Según-Hacer

Proceso escribir_num_0_9

        Escribir "Ingresar un Número; N = ? ";

        leer n;

        Segun n Hacer

                0,1,2,3: Escribir "Está bien";

                6,5,4: Escribir "Está bien";

                9,8,7: Escribir " Está bien";

                De Otro Modo:

                        Escribir " Error: debes escribir del 0 al 9"

        FinSegun

FinProceso

6. Calcula promedio 1

Proceso Menu

        Para ciclo<-1 Hasta 3 Con Paso 1 Hacer

                Escribir "Menú de opciones";

                Escribir "1. Calcula promedio";

                Escribir "2. Calcula promedio e imprime aprobado o reprobado";

                Escribir "3. Para n alumnos calcula promedio e imprime aprobado o reprobado";

                Escribir "0. Para salir digita cero";

                Escribir "Introduce un número de opción";

                Leer opcion;

                Segun opcion Hacer

                        1:

                                Escribir "Introduce el número de control y nombre del alumno ";

                                Leer N_Control,Nombre;

                                Escribir "Introduce las 5 calificaciones";

                                Leer c1,c2,c3,c4,c5;

                                promedio<-(c1+c2+c3+c4+c5)/5;

...