PRACTICA 11.
Pseudocódigo Practica 11 Problema 1.
Pseudocódigo Practica 11 Problema 1.
1.-Inicio.
Inicio programa
{
opción int
sigue char
do
{
clrscr()
imprimirmenu()
Read opción
switch(opcion)
{
case 1 : areacirculo()
case 2 : areacuadrado ()
perimetrocuadrado ()
case 3 : arearectangulo()
perimetrorectangulo()
default : Print "Error opcion: \n"
}
Print "Desea hacer otro calculo (S/N)"
Read sigue
}
while ((sigue=='s')||(sigue=='S'))
}
Funciones
void imprimirmenu()
{
Print "Opciones del menú:\n”
Print “Area del circulo.\n"
Print “Area y perimetro del cuadrado.\n"
Print "Area y perimetro del rectangulo.\n"
Print "Elija una opcion: "
}void areacirculo()
{
area, radio real
Print "Calcular area del circulo\n"
Print "Radio del circulo: "
Read radio
area=3.1416*radio*radio
Print "Area: ",area
}
Inicio programa
{
opción int
sigue char
do
{
clrscr()
imprimirmenu()
Read opción
switch(opcion)
{
case 1 : areacirculo()
case 2 : areacuadrado ()
perimetrocuadrado ()
case 3 : arearectangulo()
perimetrorectangulo()
default : Print "Error opcion: \n"
}
Print "Desea hacer otro calculo (S/N)"
Read sigue
}
while ((sigue=='s')||(sigue=='S'))
}
Funciones
void imprimirmenu()
{
Print "Opciones del menú:\n”
Print “Area del circulo.\n"
Print “Area y perimetro del cuadrado.\n"
Print "Area y perimetro del rectangulo.\n"
Print "Elija una opcion: "
}void areacirculo()
{
area, radio real
Print "Calcular area del circulo\n"
Print "Radio del circulo: "
Read radio
area=3.1416*radio*radio
Print "Area: ",area
}
void areacuadrado()
{
area, lado real
Print "Calcular area del cuadrado\n"
Print "Lado: "
Read lado
area=lado*lado
Print "Area: ",area
}void perimetrocuadrado()
{
perimetro, lado real
Print "Calcular perimetro cuadrado\n"
Print "Lado: "
Read lado
perimetro=4*lado
Print "Perimetro: ",perímetro
}void arearectangulo()
{
area, base, altura real
Print "Calcular area del rectangulo\n"
Print “Base: "
Read base
Print "Altura: "
Read altura
area=base*altura
Print "Area: ",area
}void perimetrorectangulo()
{
perimetro, base, altura real
Print "Calcular perimetro rectangulo\n"
Print "Base: "
Read base
Print "Altura: "
Read altura
perimetro=(2*base)+(2*altura)
Print "Perimetro: ",perímetro
}
Fin.
{
area, lado real
Print "Calcular area del cuadrado\n"
Print "Lado: "
Read lado
area=lado*lado
Print "Area: ",area
}void perimetrocuadrado()
{
perimetro, lado real
Print "Calcular perimetro cuadrado\n"
Print "Lado: "
Read lado
perimetro=4*lado
Print "Perimetro: ",perímetro
}void arearectangulo()
{
area, base, altura real
Print "Calcular area del rectangulo\n"
Print “Base: "
Read base
Print "Altura: "
Read altura
area=base*altura
Print "Area: ",area
}void perimetrorectangulo()
{
perimetro, base, altura real
Print "Calcular perimetro rectangulo\n"
Print "Base: "
Read base
Print "Altura: "
Read altura
perimetro=(2*base)+(2*altura)
Print "Perimetro: ",perímetro
}
Fin.
Pseudocódigo Practica 11 Problema 2.
1.- Inicio.
Inicio programa
{
opción char,
sigue int
do
{
clrscr()
imprimirmenu()
Read opción
switch(opcion)
{
case 1 : radio real
Print "Radio del circulo: "
Read radio
areacirculo(radio)
case 2 : lado real
Print "Lado: "
Read lado
areacuadrado (lado)
perimetrocuadrado (lado)
case 3 : base, altura real
Print “Base: "
Read base
Print "Altura: "
Read altura
arearectangulo(base, altura)
perimetrorectangulo(base, altura)
default : Print "Error opcion: \n"
}
Print “Desea hacer otro calculo (S/N)"
Read sigue
}
while ((sigue=='s')||(sigue=='S'))
}
Inicio programa
{
opción char,
sigue int
do
{
clrscr()
imprimirmenu()
Read opción
switch(opcion)
{
case 1 : radio real
Print "Radio del circulo: "
Read radio
areacirculo(radio)
case 2 : lado real
Print "Lado: "
Read lado
areacuadrado (lado)
perimetrocuadrado (lado)
case 3 : base, altura real
Print “Base: "
Read base
Print "Altura: "
Read altura
arearectangulo(base, altura)
perimetrorectangulo(base, altura)
default : Print "Error opcion: \n"
}
Print “Desea hacer otro calculo (S/N)"
Read sigue
}
while ((sigue=='s')||(sigue=='S'))
}
Funciones.
void imprimirmenu()
{
Print “Opciones del menú\n"
Print "Area del circulo\n"
Print "Area y perimetro del cuadrado\n"
Print “Area y perimetro del rectángulo\n"
Print "Elija una opcion: "
}
void areacirculo(real radio)
{
area real
Print "Calcular area del circulo\n"
area=3.1416*radio*radio
Print "Area: ",area
}
void areacuadrado(real lado)
{
area real
Print "Calcular area del cuadrado\n"
area=lado*lado
Print "Area: ",area
}
void perimetrocuadrado(real lado)
{
perímetro real
Print "Calcular perimetro cuadrado\n"
perimetro=4*lado
Print "Perimetro: ",perímetro
}
void arearectangulo(real base, real altura)
{
area real
Print "Calcular area del rectangulo\n"
area=base*altura
Print "Area: ",area
}
void perimetrorectangulo(real base, real altura)
{
perímetro real
Print "Calcular perimetro rectangulo\n"
perimetro=(2*base)+(2*altura)
Print "Perimetro: ",perímetro
}
Fin.
void imprimirmenu()
{
Print “Opciones del menú\n"
Print "Area del circulo\n"
Print "Area y perimetro del cuadrado\n"
Print “Area y perimetro del rectángulo\n"
Print "Elija una opcion: "
}
void areacirculo(real radio)
{
area real
Print "Calcular area del circulo\n"
area=3.1416*radio*radio
Print "Area: ",area
}
void areacuadrado(real lado)
{
area real
Print "Calcular area del cuadrado\n"
area=lado*lado
Print "Area: ",area
}
void perimetrocuadrado(real lado)
{
perímetro real
Print "Calcular perimetro cuadrado\n"
perimetro=4*lado
Print "Perimetro: ",perímetro
}
void arearectangulo(real base, real altura)
{
area real
Print "Calcular area del rectangulo\n"
area=base*altura
Print "Area: ",area
}
void perimetrorectangulo(real base, real altura)
{
perímetro real
Print "Calcular perimetro rectangulo\n"
perimetro=(2*base)+(2*altura)
Print "Perimetro: ",perímetro
}
Fin.
Pseudocódigo Practica 11 Problema 3.
1.- Inicio.
Inicio programa
{
opción int
sigue char
do
{
clrscr()
imprimirmenu()
Read opción
switch(opcion)
{
case 1 : radio real
Print "Radio del circulo: "
Read radio
areacirculo(radio)
Print "Calcular area del circulo\n"
Print "Area: ",areacirculo(radio)
case 2 : lado real
Print "Lado: "
Read lado
areacuadrado (lado)
perimetrocuadrado (lado)
Print "Calcular area y perimetro del cuadrado\n"
Print "Area: ",areacuadrado(lado)
Print "Perimetro: ",perimetrocuadrado(lado)
case 3 : base, altura real
Print "Base: "
Read base
Print "Altura: "
Read altura
arearectangulo(base, altura)
perimetrorectangulo(base, altura)
Print "Calcular area y perimetro del rectangulo\n"
Print "Area: ",arearectangulo(base, altura)
Print "Perimetro: ",perimetrorectangulo(base, altura)
default : Print "Error opcion: \n"
}
Print "Desea hacer otro calculo (S/N)"
Read sigue
}
while ((sigue=='s')||(sigue=='S'))
}
Funciones.
void imprimirmenu()
{
Print "Opciones del menu"
Print "Area del circulo"
Print "Area y perimetro del cuadrado"
Print "Area y perimetro del rectangulo"
Print "Elija una opcion: "
}
real areacirculo(real radio)
{
area real
area=3.1416*radio*radio
return area
}
real areacuadrado(real lado)
{
area real
area=lado*lado
return area
}
real perimetrocuadrado(real lado)
{
perímetro real
perimetro=4*lado
return perímetro
}
real arearectangulo(real base, real altura)
{
area real
area=base*altura
return area
}
real perimetrorectangulo(real base, real altura)
{
perimetro real
perimetro=(2*base)+(2*altura)
return perímetro
}
Fin.
1.- Inicio.
Inicio programa
{
opción int
sigue char
do
{
clrscr()
imprimirmenu()
Read opción
switch(opcion)
{
case 1 : radio real
Print "Radio del circulo: "
Read radio
areacirculo(radio)
Print "Calcular area del circulo\n"
Print "Area: ",areacirculo(radio)
case 2 : lado real
Print "Lado: "
Read lado
areacuadrado (lado)
perimetrocuadrado (lado)
Print "Calcular area y perimetro del cuadrado\n"
Print "Area: ",areacuadrado(lado)
Print "Perimetro: ",perimetrocuadrado(lado)
case 3 : base, altura real
Print "Base: "
Read base
Print "Altura: "
Read altura
arearectangulo(base, altura)
perimetrorectangulo(base, altura)
Print "Calcular area y perimetro del rectangulo\n"
Print "Area: ",arearectangulo(base, altura)
Print "Perimetro: ",perimetrorectangulo(base, altura)
default : Print "Error opcion: \n"
}
Print "Desea hacer otro calculo (S/N)"
Read sigue
}
while ((sigue=='s')||(sigue=='S'))
}
Funciones.
void imprimirmenu()
{
Print "Opciones del menu"
Print "Area del circulo"
Print "Area y perimetro del cuadrado"
Print "Area y perimetro del rectangulo"
Print "Elija una opcion: "
}
real areacirculo(real radio)
{
area real
area=3.1416*radio*radio
return area
}
real areacuadrado(real lado)
{
area real
area=lado*lado
return area
}
real perimetrocuadrado(real lado)
{
perímetro real
perimetro=4*lado
return perímetro
}
real arearectangulo(real base, real altura)
{
area real
area=base*altura
return area
}
real perimetrorectangulo(real base, real altura)
{
perimetro real
perimetro=(2*base)+(2*altura)
return perímetro
}
Fin.
Pseudocódigo Practica 11 Problema 4.
1.- Inicio.
Inicio programa
{
numero,n1,n2 int
dig,ch char
Print "P=Positivo N=Negativo 1=Verdadero/SI DIVIDE, 0=Falso/NO DIVIDE.”
Print “Numero a evaluar: "
Read numero
numposneg(numero)
Print numposneg(numero)
Print "\nNumero 1: "
Read n1
Print "\nNumero 2: "
Read n2
dividendo(n1, n2)
Print "\nSolucion: ,dividendo(n1, n2)
Print "Temperatura en grados celsius: "
Read Celsius
temperatura(celsius)
Print "\nLa temperatura en grados fahrenheit es: ",temperatura(Celsius)
Print "\n\nCaracter: "
Read dig
digito(dig)
Print "\nSolucion: ",digito(dig)
Print "\n\nCaracter: "
Read ch
vocal(ch)
Print "\nSolucion: ",vocal(ch)
}
Funciones.
char numposneg (int numero)
{
if (numero>0)
{return 'P'}
else
{return 'N'}
}
boolean dividendo(int n1, int n2)
{
if (n1/n2>0)
{return true}
else
{return false}
}
int temperatura(int celsius)
{
fahrenheit real
fahrenheit=(9.0/5.0)*celsius +32
return fahrenheit
}
boolean digito(char dig)
{
if ((dig>='0')& (dig<='9'))
{return true}
else
{return false;}
}
boolean vocal(char ch)
{
if((ch=='a')||(ch=='A')||(ch=='e')||(ch=='E')||(ch=='i')||(ch=='I')||(ch=='o')||(ch=='O')||(ch=='u')||(ch=='U'))
{return true}
else
{return false}
}
Fin.
Inicio programa
{
numero,n1,n2 int
dig,ch char
Print "P=Positivo N=Negativo 1=Verdadero/SI DIVIDE, 0=Falso/NO DIVIDE.”
Print “Numero a evaluar: "
Read numero
numposneg(numero)
Print numposneg(numero)
Print "\nNumero 1: "
Read n1
Print "\nNumero 2: "
Read n2
dividendo(n1, n2)
Print "\nSolucion: ,dividendo(n1, n2)
Print "Temperatura en grados celsius: "
Read Celsius
temperatura(celsius)
Print "\nLa temperatura en grados fahrenheit es: ",temperatura(Celsius)
Print "\n\nCaracter: "
Read dig
digito(dig)
Print "\nSolucion: ",digito(dig)
Print "\n\nCaracter: "
Read ch
vocal(ch)
Print "\nSolucion: ",vocal(ch)
}
Funciones.
char numposneg (int numero)
{
if (numero>0)
{return 'P'}
else
{return 'N'}
}
boolean dividendo(int n1, int n2)
{
if (n1/n2>0)
{return true}
else
{return false}
}
int temperatura(int celsius)
{
fahrenheit real
fahrenheit=(9.0/5.0)*celsius +32
return fahrenheit
}
boolean digito(char dig)
{
if ((dig>='0')& (dig<='9'))
{return true}
else
{return false;}
}
boolean vocal(char ch)
{
if((ch=='a')||(ch=='A')||(ch=='e')||(ch=='E')||(ch=='i')||(ch=='I')||(ch=='o')||(ch=='O')||(ch=='u')||(ch=='U'))
{return true}
else
{return false}
}
Fin.
