prompt = 'What is the original function? '
x=linspace(-3,3,601)
e=2.718281828
t=input(prompt) %function saved as string
eval(strcat('y=',t))
prompt2 = 'What is the derivative? ';
eval(strcat('z=',input(prompt2)))
%'e.^(-x.*x)-1'
%'-2*e.^(-x.*x).*x'
figure
plot(x,x,x,y)
title('Relaksacijos metodas')
xlabel('x')
ylabel('g(x)')
figure
plot(x,z)
title('Isvestine')
xlabel('x')
ylabel('g`(x)')
start='Type startpoint'
eval(strcat('x=',input(start)))
eval(strcat('x1=',t))
array=[x x1]
eval(strcat('eps=',input('Type epsilon')))
while abs(array(end)-array(end-1))>eps
    x=array(end)
    eval(strcat('x1=',t))
    array=[array x1]
end
figure
plot(array)
title('Tasko artejimas')
xlabel('zingsniai')
ylabel('taskas')