Problemas Resueltos

Programa en matlab donde se aplican las ecuaciones de dilatación térmica
% dilatacion termica
% proyecto Matlab
% integrantes:
% CHINCHAY
op=input('iniciar el programa: s/n');
if op== 's'disp('iniciar el programa');
else
disp('fin de programa')
end
while op~='n';%mientras op sea distinto de n, se ejecutara el programa
disp('calculo de dilatacion termica')
disp('elijauna opcion')
disp('1.- aluminio')
disp('2.- cobre')
disp('3.- acero')
m=input('su opcion :');
switch m
case 1
al=0.000020;
disp('a.- dilatacion lineal')
disp('b.-dilatacion superficial')
disp('c.- dilatacion volumetrica')
n=input('su opcion :');
switch n
case 'a'
disp('ingrese lo=')lo=input('usted ingreso :');
disp('ingrese to=')
to=input('usted ingreso :');
disp('ingrese tf=')
tf=input('usted ingreso :');v=lo.*al.*(tf-to);
dl=v
case 'b'
disp('ingrese so=')
so=input('usted ingreso :');
disp('ingrese to=')to=input('usted ingreso :');
disp('ingrese tf=')
tf=input('usted ingreso :');
v=2.*so.*al.*(tf-to);
ds=vcase 'c'
disp('ingrese lo=')
vo=input('usted ingreso :');
disp('ingrese to=')
to=input('usted ingreso :');disp('ingrese tf=')
tf=input('usted ingreso :');
v=3.*vo.*al.*(tf-to);
dv=v
otherwise
disp('no existe')
end
case 2al=0.000017;
disp('a.- dilatacion lineal')
disp('b.- dilatacion superficial')
disp('c.- dilatacion volumetrica')
n=input('su opcion...