sábado, 26 de octubre de 2013

SEMANA # 34


1- Elabore un algoritmo que encuentre e imprima los números impares comprendidos entre 0 y 40 ademas hallar la suma de ellos

ENTERO  SM, CT

INICIO

SM <- 0

PARA CT <- 0 HASTA 40 HAGA

SI (CT mod 2 <> 0) ENTONCES
ESCRIBA CT
LLAMAR NUEVA_LINEA
SM <- SM+CT

FIN SI

FIN PARA
ESCRIBA " La suma de los impares son:", SM
LLAMAR NUEVA_LINEA

FIN

2-  Elabore un algoritmo que encuentre e imprima los números pares comprendidos entre 0 y 40 ademas hallar la suma de ellos

ENTERO  SP, CT

INICIO

SP <- 0

PARA CT <- 0 HASTA 40 HAGA

SI (CT mod 2 = 0) ENTONCES
ESCRIBA CT
LLAMAR NUEVA_LINEA
SP <- SP+CT

FIN SI

FIN PARA
ESCRIBA " La suma de los pares son:", SP
LLAMAR NUEVA_LINEA

FIN

3-

ENTERO K, M, PER, CT  
REAL R, P , RI, PI 

 INICIO

RI <- 0
PI <- 0

ESCRIBA " numero de registro K"
LEA K
LLAMAR NUEVA_LINEA

ESCRIBA " numero de registro M"
LEA M
LLAMAR NUEVA_LINEA

PARA CT<- 1 HASTA K HAGA

ESCRIBA " Valor de k"
LEA R
LLAMAR NUEVA_LINEA

RI <- RI+R

FIN PARA

PARA CT<- 1 HASTA M HAGA

ESCRIBA " Valor de M"
LEA P
LLAMAR NUEVA_LINEA

PI <- PI+P

FIN PARA

PER <- (RI-PI)/( M+K)

ESCRIBA " el valor de PER ", PER
LLAMAR NUEVA_LINEA

FIN


CALCULE LA TABLA DE MULTIPLICAR DE 1 A 12 DE NUMERO CUALQUIER INGRESADO
N <- NUMERO
X <- CONTADOR

ENTERO N, X

INICIO

ESCRIBA " INGRESE NUMERO "
LEA N
LLAMAR NUEVA_LINEA

PARA X<-1 HASTA 12 HAGA

ESCRIBA X*N
LLAMAR NUEVA_LINEA 
FIN PARA 
FIN






No hay comentarios:

Publicar un comentario