Algoritmos











UNIVERSITARIO: Elvis mendoza ibarra

Nº DE REGISTRO:211122459

DOCENTE: Ing. Alicia Serrano Rodríguez

FECHA:25 de marzo

YAPACANI- PROV. ICHILO- SANTA CRUZ- BOLIVIA1.-
Salida: aprobado
Entrada: calif1, calif2
Variables: calif1, calif2, promedio: real;

Escribir (‘programa que sabe si estas aprobado’);
Escribir (‘ingrese la primera calificación’);Leer (calif1);
Escribir (‘ingrese la segunda calificación’);
Leer (calif2);
Promedio:= (calif1+calif2)/2;
Si promedio >= 60 entonces
Escribir (‘aprobado’);
Fin.2.-
Salida: regular
Entrada: datos del semestre
Variables: calif1, calif2, calif3, prom: real;

Escribir (‘quieres saber si eres alumno regular’);
Escribir(‘calificacion del primer semestre’);
Leer (calif1);
Escribir (‘calificacion del segundo semestre’);
Leer (calif2);
Escribir (‘calificacion del tercer semestre’);
Leer (calif3);3.-
Salida: cual es el mayor
Entrada: datos
Variables: dato1, dato2, mayor: real;

Escribir (‘cual es el mayor de dos números’);
Escribir(‘insertar el primer dato’);
Leer (dato1);
Escribir (‘insertar el segundo dato’);
Leer (dato2);
Si dato1>dato2 then
Escribir (‘el mayor es :’ ,dato1);
O dato2>dato1 then
Escribir (‘el mayores:’ ,dato2);
Fin.

































4.-
Salida: areacuadrado
Entrada: dato
Variables: dato, area: entero;

Escribir (‘programa que calcule el area deun cuadrado’);
Escrbir (‘insertar el valor del cuadrado’);
Leer (dato);
Area:=dato*dato;
Escribir (‘el area de un cuadrado es:’ ,area);
Fin.5.-
Salida: multiplicar 3 veces un dato
Entrada: datos
Variable: dato1, mult: entero;

Escribir (‘inserte dato’);
Leer (dato1);
Mult:= dato1*dato1*dato1;
Escribir...