413/CH5/EX5.6/Table_5_1.sce


1
2
3
4
5
6
7
8
9
10
11
12
13
14

clc
clear
x=1.9;
function a=expsin(y)
    a=(exp(x+y).*sin(x+y)-exp(x).*sin(x))/y 
endfunction
function out=tab5(y)   
out=[y,expsin(y)]
endfunction
y=0.05
for i=0:1:10
disp(tab5(y))
y=y.*0.5
end