Laboratorio 12




Laboratorio 12

Subprogamas en matlab



German Vega ortiz



Programa 1
Escribir un programa que mediante función.m encuentre la siguiente suma.


a) Definir en MatLab la función fact(x) quecalcula x!
b) Escribir un programa que calcule la suma, después de leer el valor de n.

Programa
function [ s ] = sumserie( n )
%UNTITLED6 Summary of this function goes here
% Detailed explanationgoes here
clc;
s=0;
for i=1:2:n
s=s+(i^2/fact(i));
end
end


Subprograma
function [ f ] = fact( n )
%UNTITLED2 Summary of this function goes here
% Detailed explanation goes here
f=1;
fori=1:1:n
f=f*i;
end
end

Programa 2
Escribir un programa que mediante función.m encuentre la siguiente suma.

Escribir un programa que calcule la suma, después de leer el valor de n, y elvalor de x debe ser tanto un escalar como un vector.

Programa
function [ s ] = sum2( n )
%UNTITLED5 Summary of this function goes here
% Detailed explanation goes here
clc
x=input('Dame x = ');
s=0;for i=1:1:n
s=s+(fact(i)/x^(i)*raiz(i));
end

end

Subprograma
function [ r ] = raiz( i )
%UNTITLED3 Summary of this function goes here
% Detailed explanation goes here
r=sqrt(2^(i));
endSubprograma
function [ f ] = fact( n )
%UNTITLED2 Summary of this function goes here
% Detailed explanation goes here
f=1;
for i=1:1:n
f=f*i;
end
end


Programa 3
Escribir un programaque mediante función.m encuentre la siguiente suma.


Escribir un programa que calcule la suma, después de leer el valor de n, y el valor de x debe ser tanto un escalar como un vector.
Programafunction [ a ] = suma3( n )
%UNTITLED8 Summary of this function goes here
% Detailed explanation goes here
clc
a=0;
x=input('Dame x = ');
a=0;
for i=1:1:n
y=mod(i,2);
if y==0a=a-(x^(i)/(2^(i)*i));
else
a=a+(x^(i)/(2^(i)*i));
end
end
end


Programa 4

Escribir un programa que mediante funciones encuentre la siguiente suma.


Escribir un programa que calcule la suma,...