Download UNIVERSIDAD TECNOLOGICA DE PEREIRA Facultad de Ing

UNIVERSIDAD TECNOLOGICA DE PEREIRA
Facultad de Ing. Industrial – Informática III
%Ingresar tres (3) números y realizar las siguientes operaciones:
%a) Potencia: Elevar el número tres a la 5 potencia siempre y cuando el número dos sea
%mayor al número uno o que el número uno sea impar.
%b) Raíz cuadrada: Determinar la raíz cuadrada de la sumatoria de los números uno y tres
%siempre y cuando el número dos sea positivo y que el número tres sea divisible por 6.
%Al final mostrar los 2 resultados.
clear all
clc
n1 = 0;
n2 = 0;
n3 = 0;
potencia = 0;
raiz = 0;
n1 = input('Ingrese el primer número: ');
n2 = input('Ingrese el segundo número: ');
n3 = input('Ingrese el tercer número: ');
if n2 > n1 | mod(n1, 2) ~= 0
potencia = n3 ^ 5;
end
if n2 >= 0 & mod(n3, 6) == 0
raiz = sqrt(n1 + n3);
end
disp(sprintf('La potencia es igual a %f', potencia))
disp(sprintf('La raíz cuadrada es igual a %f', raiz))
disp('Fin del ejercicio...')
Profesor Wilson Cortés Álvarez – [email protected]
UNIVERSIDAD TECNOLOGICA DE PEREIRA
Facultad de Ing. Industrial – Informática III
%Ingresar cuatro (4) números, determinar cuántos (cantidad) de ellos son pares
%mostrando el resultado.
clear all
clc
n1 = 0;
n2 = 0;
n3 = 0;
n4 = 0;
canpar = 0;
n1 = input('Ingrese el primer número: ');
n2 = input('Ingrese el segundo número: ');
n3 = input('Ingrese el tercer número: ');
n4 = input('Ingrese el cuarto número: ');
if mod(n1, 2) == 0
canpar = canpar + 1;
end
if mod(n2, 2) == 0
canpar = canpar + 1;
end
if mod(n3, 2) == 0
canpar = canpar + 1;
end
if mod(n4, 2) == 0
canpar = canpar + 1;
end
disp(sprintf('La cantidad de números pares es %d', canpar))
disp('Fin del ejercicio...')
Profesor Wilson Cortés Álvarez – [email protected]
UNIVERSIDAD TECNOLOGICA DE PEREIRA
Facultad de Ing. Industrial – Informática III
%Ingresar cuatro (4) números, determinar cuántos (cantidad) de ellos son pares
% y cuántos de ellos son impares.
%mostrando el resultado.
clear all
clc
n1 = 0;
n2 = 0;
n3 = 0;
n4 = 0;
canpar = 0;
canimpar = 0;
n1 = input('Ingrese el primer número: ');
n2 = input('Ingrese el segundo número: ');
n3 = input('Ingrese el tercer número: ');
n4 = input('Ingrese el cuarto número: ');
if mod(n1, 2) == 0
canpar = canpar + 1;
else
canimpar = canimpar + 1;
end
if mod(n2, 2) == 0
canpar = canpar + 1;
else
canimpar = canimpar + 1;
end
if mod(n3, 2) == 0
canpar = canpar + 1;
else
Profesor Wilson Cortés Álvarez – [email protected]
UNIVERSIDAD TECNOLOGICA DE PEREIRA
Facultad de Ing. Industrial – Informática III
canimpar = canimpar + 1;
end
if mod(n4, 2) == 0
canpar = canpar + 1;
else
canimpar = canimpar + 1;
end
disp(sprintf('La cantidad de números pares es %d', canpar))
disp(sprintf('La cantidad de números impares es %d', canimpar))
disp('Fin del ejercicio...')
Profesor Wilson Cortés Álvarez – [email protected]
UNIVERSIDAD TECNOLOGICA DE PEREIRA
Facultad de Ing. Industrial – Informática III
%En una compra se registra la información para tres (3) artículos, así:
%- Descripción
%- Cantidad
%- Valor unitario
%- Porcentaje de descuento.
%Calcular y mostrar:
% - Valor bruto de la compra
% - Valor total del descuento
% - Valor neto de la compra
%Consideración: Se aplica descuento si la cantidad de compra del artículo es superior a 10.
clear all
clc
desc1 = '';
can1 = 0;
uni1 = 0;
dscto1 = 0;
desc2 = '';
can2 = 0;
uni2 = 0;
dscto2 = 0;
desc3 = '';
can3 = 0;
uni3 = 0;
dscto3 = 0;
vlrdscto = 0;
Vlrbruto = 0;
vlrneto = 0;
disp('Artículo Uno')
Profesor Wilson Cortés Álvarez – [email protected]
UNIVERSIDAD TECNOLOGICA DE PEREIRA
Facultad de Ing. Industrial – Informática III
desc1 = input('Descripción del artículo: ','s');
can1 = input('Cantidad de compra: ');
uni1 = input('Valor unitario: ');
dscto1 = input('Porcentaje descuento: ');
disp('Artículo Dos')
desc2 = input('Descripción del artículo: ','s');
can2 = input('Cantidad de compra: ');
uni2 = input('Valor unitario: ');
dscto2 = input('Porcentaje descuento: ');
disp('Artículo Tres')
desc3 = input('Descripción del artículo: ','s');
can3 = input('Cantidad de compra: ');
uni3 = input('Valor unitario: ');
dscto3 = input('Porcentaje descuento: ');
% Si la cantidad de compra es mayor a 10 se calcula el descuento y se
% acumula su valor.
if can1 > 10
vlrdscto = vlrdscto + (can1 * uni1) * dscto1 / 100;
end
if can2 > 10
vlrdscto = vlrdscto + (can2 * uni2) * dscto2 / 100;
end
if can3 > 10
vlrdscto = vlrdscto + (can3 * uni3) * dscto3 / 100;
end
vlrbruto = (can1*uni1) + (can2*uni2) + (can3*uni3);
vlrneto = vlrbruto - vlrdscto;
disp('---RESULTADOS---')
Profesor Wilson Cortés Álvarez – [email protected]
UNIVERSIDAD TECNOLOGICA DE PEREIRA
Facultad de Ing. Industrial – Informática III
disp(sprintf('Valor bruto
%.2f', vlrbruto))
disp(sprintf('Valor descuento %.2f', vlrdscto))
disp(sprintf('Valor neto
%.2f', vlrneto))
disp('Fin del ejercicio...')
Profesor Wilson Cortés Álvarez – [email protected]
UNIVERSIDAD TECNOLOGICA DE PEREIRA
Facultad de Ing. Industrial – Informática III
%Una persona devenga un salario mensual (30 días) de 3 millones de pesos, al cabo
%de un mes de trabajo las novedades para su pago son las siguientes:
%- Descuento funerario de $35.000 pesos
%- Descuento por cooperativa de $450.000 pesos
%- Descuento por alimentación de $90.000 pesos
%- Bonificación de buen empleado por $380.000 pesos
%Tenga en cuenta que solo labora 20 días del mes.
%Calcule y muestre el pago devengado por el empleado de acuerdo a las novedades
%reportadas en el periodo.
clear all
clc
pago = 0;
% Salario mensual asignado
salario = 3000000;
% Sueldo a pagar por los 20 días trabajados
sueldo = (salario / 30) * 20;
% Devengos menos deducciones
pago = sueldo + 380000 - 35000 - 450000 - 90000;
disp(sprintf('Pago del empleado en el mes %.2f', pago))
disp('Fin del ejercicio...')
Profesor Wilson Cortés Álvarez – [email protected]