jueves, 5 de noviembre de 2009

Algoritmo del Área de Una Figura (Triangulo):

Solucion:

Digite el numero de lados
Leo a

INICIO:
_ If: a=3
Then
Digite la Base
Lea

Digite la Altura Lea h

_ENDIF
a = (BxH) /2
Imprima el Area "a"
_ENDIF

Algoritmo de Los Meses

Int Valor
Inicio
Digito valor correspondiente
Leo valor
If: (Valor: 1)
Then
Imprima: “Enero”
Else
If: (Valor: 2)
Then
Imprima: “Febrero”
Else
If: (Valor: 3)
Then
Imprima: Marzo
Else
If: (Valor: 4)
Then
Imprima: “Abril”
Else
If: (Valor: 5)
Then
Imprima: “Mayo”
Else
If: (Valor: 6)
Then
Imprima: “Junio”
else
If: (Valor: 7)
Then
Imprima: “Julio”
else
If: (Valor: 8)
Then
Imprima: “Agosto”
else
If: (Valor: 9)
Then
Imprima: “Septiembre”
else
If: (Valor: 10)
Then
Imprima: “Octubre”
else
If: (Valor: 11)
Then
Imprima: “Noviembre”
else
If: (Valor: 12)
Then
Imprima: “Diciembre”

FIN

domingo, 1 de noviembre de 2009

Algoritmo del Sexo y La Edad

SOLUCION:

int edad
char sexo

INICIO:
Digite la edad
lea la edad
digite sexo
leo sexo
If:(Edad >20) ^ (Edad <35)^sexo:m>18)^(Edad<21)^sexo:f>40)^Sexo:F o Sexo:M
Then
Imprima:"Aspira un cargo Presidencial"
else
If:(Edad>18)^(Edad<21) Sexo:M
Then
Imprima:"Aspira un cargo de Asistente"
FIN