Promedio de notas

Proceso promedio
Definir prom Como Numerica;
Definir nota5 Como Numerica;
Definir nota4 Como Numerica;
Definir nota3 Como Numerica;
Definir nota2 Como Numerica;
Definir nota1 Como Numerica;
escribir "escriba nota1";
leer nota1;
escribir "escriba nota2";
leer nota2;
escribir "escriba nota3";
leer nota3;
escribir "escriba nota4";
leer nota4;
escribir "escriba nota5";
leer nota5;
prom<-(nota1+nota2+nota3+nota4+nota5)/5;
escribir "el promedio del alumno es", +prom;


FinProceso

*** Ejecución Iniciada. ***

escriba nota1

> 10

escriba nota2

> 7

escriba nota3

> 4

escriba nota4

> 6

escriba nota5

> 10

el promedio del alumno es7.4

*** Ejecución Finalizada. ***

Read More

Menu de opciones

Proceso MenudeOpciones
Repetir
LIMPIAR PANTALLA
Escribir "Mostrar Menu de Opciones"
Escribir " 1. SUMA"
Escribir " 2. RESTA"
Escribir " 3. MULTIPLICACION"
Escribir " 4. DIVICIOM"
Escribir " 5. SALIR"
Escribir "ELIJA UNA OPCION (1-5) :"
Leer OP
Segun OP Hacer
1:
Escribir "OPCION SUMA"
Escribir "INGRESE EL PRIMER NUMERO:"
Leer A
Escribir "INGRESE EL SEGUNDO NUMERO:"
Leer B
C <- A+B
Escribir "EL RESULTADO ES:",C
2:
Escribir "OPCION RESTA"
Escribir "INGRESE EL PRIMER NUMERO"
Leer A
Escribir "INGRESE EL SEGUNDO NUMERO"
Leer B
C <-A-B
Escribir "ESCRIBIR EL RESULTADO ES:",C
3:
Escribir "OPCION MULTIPLICACION"
Escribir "INGRESE EL PRIMER NUMERO"
Leer A
Escribir "INGRESE EL SEGUNDO NUMERO"
Leer B
C <-A*B
Escribir "ESCRIBIR EL RESULTADO ES:",C
4:
Escribir "OPCION DIVICION"
Escribir "INGRESE EL PRIMER NUMERO (DIVISOR)"
Leer A
Escribir "INGRESE EL SEGUNDO NUMERO (DIVISOR)"
Leer B
Si (B==0) Entonces
Escribir "NO EXISTE LA DIVICION POR CERO (0)"
Sino
C<-A/B
Escribir "ESCRIBIR EL RESULTADO ES :",C
Fin Si
5:
Escribir "GRACIAS POR SU USO"1

1
De otro modo:
Escribir "escribir opcion no valida"
FinSegun
Escribir "precione tecla para continuar"
Esperar tecla
Hasta que op=5
FinProces

Mostrar Menu de Opciones

1. SUMA

2. RESTA

3. MULTIPLICACION

4. DIVICIOM

5. SALIR

ELIJA UNA OPCION (1-5) :

> 1

OPCION SUMA

INGRESE EL PRIMER NUMERO:

> 45

INGRESE EL SEGUNDO NUMERO:

> 69

EL RESULTADO ES:114

precione tecla para continua

Read More

El mayor entre tres numeros

Proceso mayorymenorentresnumeros
Definir n3 Como Numerica;
Definir n2 Como Numerica;
Definir n1 Como Numerica;
n1<-0;
n2<-0;
n3<-0;
escribir "escribe tus tres valores";
leer n1,n2,n3;
Si n1>n2 & n1>n3 Entonces
escribir "el valor mayor es el primero" ,n1;
Sino
si n2>n1 & n2>n3 Entonces
escribir "el segundo valor es el mayor" ,n2;
Sino
si n3>n1 & n3>2 Entonces
escribir "el tercer numero es el mayor" ,n3;
Sino
escribir "todos son iguales";
FinSi
FinSi
FinSi
FinProceso

*** Ejecución Iniciada. ***

escribe tus tres valores

> 45

> 47

> 12

el segundo valor es el mayor47

*** Ejecución Finalizada. **

Read More

Intercambio de valores

Proceso intercambio
 Definir b Como Numerica;
 Definir a Como Numerica;
 escribir "escriba el valor de a";
 escribir "escriba el valor de b";
 leer a,b;
 escribir "el valor de a es:" ,b;
 escribir "el valor de b es" ,a;
 
 
 
FinProceso

*** Ejecución Iniciada. ***
escriba el valor de a
escriba el valor de b
> 4
> 5
el valor de a es:5
el valor de b es:4
*** Ejecución Finalizada. ***

Read More

Como encontrar el area del circulo

Proceso circulo

escribir "ingrese elvalor de la medida del circulo";

leer r;

area<- 3.14*r^2 ;

Escribir "el area del circulo es" , +area ;

FinProceso


*** Ejecución Iniciada. ***
ingrese elvalor de la medida del circulo
> 40
el area del circulo es5024
*** Ejecución Finalizada. ***

Read More