aqui un enlace de los trabajos en clase hasta ahora
Sitio: trabajos.rar
martes, 31 de marzo de 2009
lunes, 30 de marzo de 2009
calcular intencidad
Proceso Calcular_intencidad
Escribir "ingrese el valor del voltaje";
leer voltage;
Escribir "ingrese valor de la resistencia";
Escribir "ingrese valor de la resistencia";
Leer resistencia;
si (resistencia >0) Entonces intencidad <-voltage/resistencia;
si (resistencia >0) Entonces intencidad <-voltage/resistencia;
Escribir "resultado=",intencidad Sino
Escribir "chuuuuuuu";
FinSi leer pausa;
Escribir "ese programa fue escrito por miguel garcia ";FinProceso
calcular area de un triangulo rectangulo
este codigo sirve para calcular el area de un triangulo rectangulo ademas de entregar un mensaje si una de las medidas ingresadas es menor o igual a cero,evitando que salga un error
Proceso calcular_area
//programa para calcular area de un triangulo rectangulo
//pide ingresar un valor altura
Escribir "ingresar altura"; //lee valor
Leer altura; //pide ingresar valor de base;
Escribir "ingresar base";
//lee valor de base
leer base;
//compara si uno de los valores es menor o igual a 0
Si (base <=0 o altura <=0) Entonces //muestra valor si la compracion es verdadera Escribir "uno de los valores es incorrecto"; //realiza operacion si el valor de la comparacion es falsaSino area <-base*altura/2; //muestra resultado escribir area; FinSi FinProceso
//programa para calcular area de un triangulo rectangulo
//pide ingresar un valor altura
Escribir "ingresar altura"; //lee valor
Leer altura; //pide ingresar valor de base;
Escribir "ingresar base";
//lee valor de base
leer base;
//compara si uno de los valores es menor o igual a 0
Si (base <=0 o altura <=0) Entonces //muestra valor si la compracion es verdadera Escribir "uno de los valores es incorrecto"; //realiza operacion si el valor de la comparacion es falsaSino area <-base*altura/2; //muestra resultado escribir area; FinSi FinProceso
ley de ohm
el siguiente codigo es para poder generar el valor de la intencidad de corriente a partir de tener los valores de voltage y resistencia
Proceso calcular_intencidad
Escribir "ingrese el valor del voltaje";
leer voltage;
Escribir "ingrese valor de la resistencia";
Leer resistencia;
si (resistencia >0) Entonces intencidad <-voltage/resistencia;
Escribir "resultado=",intencidad;
Sino Escribir "chuuuuuuu";
FinSi
FinProceso
Suscribirse a:
Entradas (Atom)