14 de Febrero

Clase N°5                                                                              

PROGRAMANDO EN CUADERNO

* Algoritmo que múltiple un número introducido por el usuario (por 2)

Proceso Multiplicación_de_un_Real_por_dos

Definir n1, Resultado como Real;

Escribir "Ingrese su Número a multiplicar";

Leer n1;

Escribir "Tu número será multiplicado por 2 automáticamente...";

Escribir "...";

Resultado<-n1*2;

Escribir "Tu número multiplicado por 2 es ", Resultado;

FinProceso

*  Calcular interés simple, dado un interés, capital y tiempo determinado.

Algoritmo Calcular_interes_simple
Definir C, i, T, IS Como Real;
Escribir "Ingrese el Capital";
Leer C;
Escribir "Ingrese el interés";
Leer i;
Escribir "Ingrese el tiempo determinado";
Leer T;
IS<-C*i*T;
Escribir "El interés simple es ", IS;
FinAlgoritmo

* Calcular el sueldo horas extras pagadas al doble

Algoritmo Calculo_de_Sueldo_Normal_mas_horas_extras_pagadas_al_doble_a_la_semana
Definir SN,SD,HL,Hp,He,HHP,SHEPD,Resultado Como Real;
Escribir 'Ingresa tu Sueldo Normal en la semana';
Leer SN;
SD <- SN/7;
Escribir 'Tu Sueldo al dia es ',SD;
Escribir 'Ingresa horas laboradas al dia';
Leer HL;
Hp <- SD/HL;
Escribir 'Tu Sueldo por hora es ',Hp;
Escribir 'Ingresa horas extras laboradas en la semana';
Leer He;
HHP <- Hp*He;
Escribir 'Tu Sueldo pagado por todas tus horas extras es ',HHP;
SHEPD <- HHP*2;
Escribir 'Entonces tu sueldo de horas extras pagadas al doble es ',SHEPD;
Resultado <- SN+SHEPD;
Escribir 'Tu total de pago por la suma de Sueldo Normal más horas extras                 pagadas al doble es ',Resultado;
FinAlgoritmo

* Calcular el promedio de 3 notas.

Algoritmo Calculo_de_Promedio_de_3_notas
Escribir "Ingrese su nota 1";
Leer N1;
Escribir "Ingrese su nota 2";
Leer N2;
Escribir "Ingrese su nota 3";
Leer N3;
Resultado<-(N1+N2+N3)/3;
Escribir "El resultado de tu promedio es ", Resultado;
FinAlgoritmo