Синтаксис МАТЛАБа

[SasaTet]

Помогите, пожалуйста, переписать программу из паскаля в синтаксис матлаба.
Дана последовательность Xn=(e^(0,01*n))*sin(0,01*n), найти сумму членов последовательности Xn, начиная с Xo и до последнего Xn/

Program posledovetelnost;
Function Xn(n:integer):real;
begin
Xn:=(exp(0.01*n))*sin(0.01*n)
end;
var
Sum:real;
n,i:integer;
begin
writeln('Введите n');
readln(n);
Sum:=0;
for i:=0 to n do
begin
Sum:=Sum+Xn(n);
end;
writeln('Сумма ряда=',Sum);
end.