Ejercicios de acciones simples.
Un alumno desea saber cuál será su calificación final en el curso.
Dicha calificación se compone de los siguientes porcentajes:
- 55% del promedio de sus tres calificaciones parciales.
- 30% de la calificación del examen final.
- 15% de la calificación de un trabajo final.
1 Proceso NotaConTresParcialesyDosFinales
2 //Calcular nota
final
3 // 55% media de
tres parciales
4 // 30% examen
final
5 // 15% trabajo
final
6 Definir Parcial1, Parcial2,
Parcial3 Como Real;
7 Definir ExamenFinal, TrabajoFinal
Como
Real;
8 Definir Nota, Media
Como
Real;
9 Escribir "Parcial
1";
10 Leer Parcial1;
11 Escribir "Parcial
2";
12 Leer Parcial2;
13 Escribir "Parcial
3";
14 Leer Parcial3;
15 Escribir "Examen
Final";
16 Leer ExamenFinal;
17 Escribir "Trabajo Final"
;
18 Leer TrabajoFinal;
19 Media <-(Parcial1 + Parcial2
+ Parcial3) / 3;
20 Nota <- (Media * 0.55 ) + (ExamenFinal * 0.30) + (TrabajoFinal *
0.15);
21 Escribir "La nota es:
", Nota;
22 FinProceso
Un programa que lea 4 números y calcule la media.
1 Proceso LeerCuatroNumeroyCalcularMedia
2 Definir Num1, Num2,
Num3, Num4 Como Real;
3 Definir Media Como Real;
4 Escribir "Escribe el
Num1";
5 Leer Num1;
6 Escribir "Escribe el
Num2";
7 Leer Num2;
8 Escribir "Escribe el
Num3";
9 Leer Num3;
10 Escribir "Escribe el
Num4";
11 Leer Num4;
12 Media <- (Num1 + Num2
+ Num3 + Num4) / 4;
13 Escribir "La media es
", Media;
14 FinProceso
Un programa que lea una temperatura en grados centígrados y la convierta a Fahrenheit.
1 Proceso CentigradosFahrenheit
2 //lee temp en
ºC y los pasa a ºF
3 // F = (9 / 5)
* C + 32;
4 Definir Celsius, Fahrenheit
Como
Real;
5 Escribir "Introduce los
grados Celsius";
6 Leer Celsius;
7 Fahrenheit <- ((9/5) * Celsius) + 32;
8 Escribir "La
temperatura en Fahrenheit es: ", Fahrenheit;
9 FinProceso
Un programa que lea una temperatura en grados Fahrenheit y la convierta a centígrados.
1 Proceso FahrenheitCelsius
2 //lee temp en
ºF y los pasa a ºC
3 // C = ( F - 32
) * (5 /9)
4
5 Definir Celsius, Fahrenheit
Como
Real;
6 Escribir "Introduce los
grados Fahrenheit";
7 Leer Fahrenheit;
8 Celsius <- ( Fahrenheit - 32) * (5/9);
9 Escribir "La
temperatura en Celsius es: ", Celsius;
10 FinProceso
Calcular cuota hipoteca.
1 Proceso CalcularCuotaHipoteca
2 //leer años,
capital y interes
3 //Couta =
(Capital * Interes) /
4 // 100 * (1 -
(1+(interes/100))^ - plazo)
5 Definir Anyos Como Entero;
6 Definir Capital, Interes
Como
Real;
7 Definir Couta Como Real;
8 Escribir "Introduce
Capital";
9 Leer Capital;
10 Escribir "Introduce
Interes (%) ";
11 Leer Interes;
12 Escribir "Intrduce
Años";
13 Leer Anyos;
14 Definir Plazo, InteresMensual
Como
Real;
15 Plazo <- Anyos * 12 ;
16 Plazo <- -Plazo ;
17 Escribir "Plazo " , Plazo;
18 // 1 + interes
= ( 1 + InteresMensual)^12;
19 //InteresMensual
=((1+Interes)^(1/12)) - 1;
20 InteresMensual <- ((1 + (Interes/100))^(1/12))-1;
21 InteresMensual <- InteresMensual *
100;
22 Escribir "InteresMensual
" , InteresMensual;
23 Definir A, B Como Real;
24 A <- Capital * InteresMensual;
25 B <- 100 * ( 1 - (1 + (InteresMensual/100))^(plazo));
26 Couta <- A / B;
27 Escribir "la Cuota es
" , Couta;
28 FinProceso
No hay comentarios:
Publicar un comentario