solution:
function [y]=pdeeq()
format long;
h=0.1;
k=0.005;
l=k/(h^2);
x=0:h:1;
t=0:k:0.015;
for i=1:length(x)
u(i,1)=sin(pi*x(i));
end
for i=1:length(t)
u(1,i)=0;
u(length(x),i)=0;
end
for j=1:length(t)-1
for i=2:length(x)-1
u(i,j+1)=l*(u(i+1,j)+u(i-1,j))+(1-2*l)*u(i,j);
end
end
disp(u);
Solution:
   Â
           Â
t=0Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â
t=0.005Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â
t=0.010Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â
t=0.015
              Â
0Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â
0Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â
0Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â
0
  0.309016994374947 Â
0.293892626146237Â Â 0.279508497187474Â Â
0.265828377610012
  0.587785252292473 Â
0.559016994374947Â Â 0.531656755220025Â Â
0.505635621484342
  0.809016994374947 Â
0.769420884293813Â Â 0.731762745781211Â Â
0.695947727757254
  0.951056516295154 Â
0.904508497187474Â Â 0.860238700294483Â Â
0.818135621484342
  1.000000000000000 Â
0.951056516295154Â Â 0.904508497187474Â Â
0.860238700294484
  0.951056516295154 Â
0.904508497187474Â Â 0.860238700294484Â Â
0.818135621484342
  0.809016994374947 Â
0.769420884293814Â Â 0.731762745781211Â Â
0.695947727757254
  0.587785252292473 Â
0.559016994374947Â Â 0.531656755220025Â Â
0.505635621484342
  0.309016994374948 Â
0.293892626146237Â Â 0.279508497187474Â Â
0.265828377610013
                 Â
0Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â
0Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â
0Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â
0