Algoritmos

1)Ejercicio
Un algoritmo Correspondiente a un programa que me de el orden de 3 numeros

Solucion


Proceso orden
Definir n1,n2,n3 Como Entero
Escribir "Digite un numero:";
Leer n1
Escribir "Digite otro numero:";
Leer n2
Escribir "Digite otro numero:";
Leer n3
si (n1>n2) y (n2>n3) Entonces
Escribir "El orden de los numeros es:",n1," ",n2," ",n3
Sino
si (n1>n3) y (n3>n2) Entonces
Escribir "El orden de los numeros es:",n1," ",n3," ",n2
Sino
si (n2>n1) y (n1>n3) Entonces
escribir "El orden de los numeros es:",n2," ",n1," ",n3
Sino
si (n2>n3) y (n3>n1) Entonces
escribir "El orden de los numeros es:",n2," ",n3," ",n1
Sino
si (n3>n1) y (n1>n2) Entonces
escribir "El orden de los numeros es:",n3," ",n1," ",n2
Sino
si (n3>n2) y (n2>n1) Entonces
escribir "El orden de los numeros es:",n3," ",n2," ",n1
FinSi
FinSi
FinSi
FinSi
FinSi
FinSi

FinProceso



2)Un algoritmo que me diga cuantos años tengo, dando datos de nacimiento y actuales

Solucion


Proceso Años dé una persona
Escribir Sin Saltar "Ingrese el valor de anno actual:";
Leer anno_actual;
Escribir Sin Saltar"ingrese el valor de anno de nacimiento:";
Leer anno_de_nacimiento;
Escribir Sin Saltar "ingrese el valor de dia actual:";
Leer dia_actual;
Escribir sin saltar "Ingrese el valor de dia de nacimiento:";
Leer dia_de_nacimiento;
Escribir Sin Saltar"Ingrese el valor de mes actual:";
Leer mes_actual;
Escribir sin saltar "Ingrese el valor de mes de nacimiento:";
Leer mes_nacimiento;
edad = anno_actual - anno_de_nacimiento;
si mes_nacimiento > mes_actual o (mes_nacimiento = mes_actual y dia_de_nacimiento > dia_actual)Entonces
edad=edad-1;
FinSi
Escribir "El valor de edad es:",edad;
FinProceso



3)Un algoritmo que me diga n multiplos de 3

Solucion


Proceso Multiplode3
Definir n,i,cont,suma,prom Como Real;

Escribir "Digite la cantidad de numeros:";
Leer n;

cont = 0;
Suma = 0;
Para i = 1 hasta n con paso 1 Hacer

si i mod 3 = 0 Entonces
escribir i;

cont = cont + 1;
suma = suma + i;
FinSi


FinPara
prom = suma / cont;
Escribir "La suma de los numeros es:",suma;
Escribir "el promedio de los numeros es:",prom;
FinProceso


4)Un algoritmo que de diga los n numeros impares

Solucion


Proceso impares
Definir n, k, num como real;
Escribir "Digite hasta que numero:";
Leer n;
k= 1;
Mientras k <=n Hacer
Escribir "Digite el numero:";
Leer num;
si num MOD 2 <> 0 Entonces
Escribir "el numero:",num,"es impar";
Sino
Escribir "El numero no es impar";
FinSi
k = k+1;
FinMientras
FinProceso


5)Un algoritmo que me diga n numeros positivos
.
Solucion


Proceso positivo
Definir n, i,num,j Como Real;
Escribir "Digite cuantos numeros";
Leer n;
j = 1;
Mientras j <= n hacer
Escribir "Digite el numero";
Leer num;
si num> 0 Entonces
Escribir num;
FinSi
j = j +1;
FinMientras

FinProceso

No hay comentarios:

Publicar un comentario