MATLAB5

VALOR ABSOLUTO

function [ x ] = v_bsoluto(A)

 if (A>0)

     x=A;

 else

     x=-A  ;

 end

VALOR ABSOLUTO DE UNA MATRIZ 

function [ x ] = valorabsoluto(A)

 [n,m]=size(A);

 for (i=1:n);

     for (j=1:m);

         if A(i,j)<0;

             X(i,j)=-A(i,j);

         else

             X(i,j)=A(i,j)

         end

     end

 end

VELOCIDAD FINAL 

function [v1] = velo_final(vi,t,a)

v1=vi+t*a;

end

VELOCIDAD INICIAL

function [v1] = velo_inicial(vf,t,a)

v1=vf-t*a;

end

VELOCIDAD

function [v] = velocidad(d,t)

v=d/t;

end

VOLUMEN DEL TETRAEDRO

function [x] = volumen_tetraedro(a)

%regular

A=(sqrt(2)*a*a*a)/12;

x=A

end