1/7
GUIA DE LABORATORIO Nº 3
SCRPTS EN MATLAB
OBJETIVOS
1. Implementar scripts en matlab
2. Uso de instrucciones de entrada, salida de datos
3. Uso de instrucciones condicionantes, repetitivas y funciones creadas por el
usuario.
Ejem 1
%{
Escribir un script que le pida el ingreso de sus apellidos/nombres y su año de
nacimiento para luego mostrar en pantalla los datos ingresados y la edad que
cumplió o cumplirá en este año.
%}
clc
nom=input('Ingrese sus nombres y apellidos\n');
aNacio=input('En que año nació:');
edad=2020-aNacio;
disp(' ');
fprintf('Mis nombres y apellidos es:%s\n',nom);
fprintf('Año de nacimiento es:%d\n',aNacio);
fprintf('Tengo o cumpliré:%d años\n',edad);
disp('Gracias por la informacion');
Ejem 2
%{
Diseñe un algoritmo que evalúe las siguientes funciones
x+1 si x< -1
f(x)=
1-x^2 si x>=-1
%}
clc %Limpia la pantalla
x=input('Ingrese el valor de x=> ');
if x<-1
y=x+1;
else
y=1-x^2;
end
fprintf('\nx=%f\t\ty=%f\n\n',x,y);
Métodos Numéricos Ing. Félix Huari Evangelista
2/7
Ejem 3
%{
Escribir un script que pida el ingreso de 4 notas en vector fila para luego calcular el
promedio. Luego mostrar las notas como un vector columna y el promedio
obtenido.
%}
clc
disp('Asumir que sus notas son positivas (0-20)');
notas=input('Ingrese sus 4 notas como un vector fila\n');
prom=mean(notas);
disp(' ');
disp('Notas');
disp(notas');
fprintf('El promedio es =%f\n',prom);
if prom>10.5
disp('Usted a aprobado');
else
disp('Usted a desaprobado');
end
Ejem 4
%{
Escribir un script que pida el ingreso de 4 notas para luego calcular el promedio.
Finalmente mostrar las notas como un vector columna y el promedio obtenido.
%}
clc
disp('Asumir que sus notas son positivas (0-20)');
k=1; suma=0;
while k<=4
fprintf('Nota %d\n',k);
nota(k)=input(' ');
suma=suma+nota(k);
k=k+1;
end
prom=suma/4;
clc
disp('Notas');
disp(nota');
fprintf('El promedio es =%f\n',prom);
if prom>10.5
disp('Usted a aprobado');
else
disp('Usted a desaprobado');
end
Métodos Numéricos Ing. Félix Huari Evangelista
3/7
Ejem 5
%{
Las exportaciones, en miles de dólares de paltas de Perú, México y Colombia
hacia Alemania, España y Francia durante los años 2018 y 2019 vienen dado en
las matrices A y B. En base a ella se pide:
a) Calcular el total de exportación para los 2 años por cada país hacia los países
de destino.
b) Cuantos mil de dólares ha exportado Perú hacia Alemania.
%}
clc
disp('Exportaciones en miles de dolares del año 2018');
A=input('Ingrese los montos\n');
disp('Exportaciones en miles de dolares del año 2019');
B=input('Ingrese los montos\n');
T=A+B;
pa=A(1,1)+B(1,1);
clc;
disp('Exportaciones del 2018');
disp(A);
disp('Exportaciones del 2019');
disp(B);
fprintf('\nTotal de exportaciones de Peru a Alemania:%10.2f\n',pa);
Ejem 6
%{
Una compañía de muebles fabrica una serie de productos para el mercado local
mensualmente, entre las cuales destaca 3 tipos de productos: butacas, sofas y
mecedoras. Por cada tipo de producto se tiene modelos para sala, terraza y
dormitorio. Por otro lado, se tiene el costo unitario y el precio unitario de venta por
cada tipo de producto, en base a ello se pide:
a) Leer los datos para ambas matrices.
b) Se pide calcular la producción anual, asumir que la producción mensual es igual
todos los meses.
c) Calcular el costo total y el ingreso total por cada tipo de producto
%}
clc
t2=['Butaca ';'Sillon ';'Mecedora'];
P=LeerProduccionMensual; %Funcion para leer la matriz producción
C=LeerCostoUPrecioVta; %Funcion para leer el costo y precio unitario
TP=CalcularProduccionTotal(P);
CI=CostoTotalIngresoTotal(P,C);
SalidaResultados(P,C,TP,CI,t2);
Métodos Numéricos Ing. Félix Huari Evangelista
4/7
% Defincion de las funciones
function X=LeerProduccionMensual
disp('Produccion mensual mueble y por modelo');
X=input('Ingrese la producción\n');
end
function Z=LeerCostoUPrecioVta
disp('Lectura costo unitario y precio unitario de venta');
Z=input(' ');
end
function Y=CalcularProduccionTotal(Q)
Y=12*Q; % 12 indica la cantidad de meses que tiene el año
end
function CtoIng=CostoTotalIngresoTotal(p,c)
CtoIng=p*c;% Calcula el costo total el ingreso total lo guarda en la matriz
end
function SalidaResultados(P,C,TP,CI,t2)
disp('Fabrica muebles-produccion muebles');
disp('Sala Terraza Dormitorio');
disp(P);
disp('Costo precio unitario');
disp('Unitario venta');
disp(C);
disp('Produccion total anual');
disp('Sala Terraza Dormitorio');
disp(TP);
disp(' Costo Ingresos');
disp(' Total Totales');
disp([t2,int2str(CI)]);
end
Ejem 7
%{
Escribir un script que permita el ingreso de los valores para a y b para luego
generar un gráfico en 3D. Para ello debe trabajar con las siguientes funciones.
x = √𝑡𝑆𝑒𝑛(2𝑡) 𝑦 = √𝑡𝐶𝑜𝑠(2𝑡) z = 0.5t
El valor de t ϵ [0, aπ]
%}
clc
[a1,b1]=LeerConstantes;
Métodos Numéricos Ing. Félix Huari Evangelista
5/7
Graficar(a1,b1);
%Definicion de las funciones
function [a,b]=LeerConstantes
while true
a=input('Ingrese el valor de a:');
b=input('Ingrese el valor de b:');
if a>0 && b>0
break
else
disp('Datos ingresados son incorrectos, intente nuevamente');
end
end
end
function Graficar(a,b)
t=0:0.01:a*pi;
x=sqrt(t).*sin(b*t);
y=sqrt(t).*cos(b*t);
z=0.5*t;
plot3(x,y,z)
grid on;
grid minor;
xlabel 'Eje X'
ylabel 'Eje Y'
zlabel 'Eje Z'
title('x=sqrt(t)sen(bt) y=sqrt(t)cos(bt) z =0.5t');
end
Métodos Numéricos Ing. Félix Huari Evangelista
6/7
PROBLEMAS PROPUESTOS
1. Escribir un script que permita mostrar una ecuación lineal como se muestra:
a1x1+a2x2+a3x3+a4x4=b
Para ello debe ingresar los valores de a1, a2, a3, a4 y b.
2. Dado una matriz tal como se muestra a continuación:
3 −1 5 4 5 7
A= [ ] B= [ ]
1 0 4 7 −2 −3
Se pide escribir un script para realizar lo siguiente
a) Calcular 3A+5B, luego mostrarlo
b) Calcular A2, posteriormente mostrar
Cuando ejecute el script debe probar con los datos de la matriz dada, luego
generalizar para cuando la matriz tenga otros datos, incluso puede cambiar el
orden de la matriz.
3. Una empresa dispone de 3 proveedores para que le suministre los útiles de
oficina. La empresa consume 4 tipos de productos (lapiceros, file manila, papel
bond y posits). Los costos unitarios por cada proveedor son como sigue:
proveedor 1: s/20 / docena de lapicero, s/.50/docena de file de manila,
s/.47/millar de papel bond y s/.18/ciento de posits. El proveedor 2 cobra s/.19,
s/.40, s/.46 y s/.19, mientras que el proveedor 3 cobra s/.17, s/.48, s/.45 y s/.17
respectivamente por los mismos artículos. Por otro lado, la empresa dispone
de 3 sucursales y la demanda anual por cada sucursal son como sigue:
sucursal 1 consume 20 docenas de lapicero, 75 docenas de file manila, 50
millares de papel bond y 10 cientos de posits. La sucursal 2 consume 10, 50,
30 y 15 respectivamente y la sucursal 3 consume 15, 40, 65 y 20
respectivamente. En base a lo anterior se pide implementar una script para
realizar lo siguiente:
✓ Realizar la lectura de datos y probar con los datos de este ejemplo.
✓ Calcular y mostrar el costo total por cada proveedor y sucursal.
✓ Calcular y mostrar el costo total por cada sucursal
✓ Calcular y mostrar el pago total que debe hacerse a cada proveedor.
4. Dada las siguientes funciones indicadas líneas abajo, cree un script para
escribir el valor de y para un valor dado de x, el valor. El valor de x debe ser
positivo, de no ser así, escribir un mensaje de error.
a) 𝑦 = |𝑥 − 5| b) 𝑦 = 𝑒 2𝑥
Métodos Numéricos Ing. Félix Huari Evangelista
7/7
Luego generar ambos gráficos en una sola ventana gráfica, donde el dominio
debe considerar de acuerdo con su criterio.
Colocar el titulo adecuado para el grafico, los ejes coordenados, las leyendas,
color, tipo de línea, puntos de intersección y el grosor de la línea.
5. Cree vectores x e y desde -a hasta +a con un espaciamiento de 0.01. Use la
función meshgrid para mapear x e y en dos nuevas matrices bidimensionales
llamadas X e Y. Luego use sus nuevas matrices para calcular el vector Z que
esta dado por:
Z=sen(√𝑋 2 + 𝑌 2 )
Implementar un script para crear el grafico en 3D usando las funciones plot3,
mesh y surf.
Métodos Numéricos Ing. Félix Huari Evangelista
