T=2;
delta=1/100;
a1m=0; a1n=0;
for i=0:99
    a11=(-sin(-pi.*i/100))*delta;
    a1m=a1m+a11;
end; 
for i=0:99
    a111=(sin(pi.*i/100))*delta;
    a1n=a1n+a111;
end; 
a1T=a1m+a1n;
display(a1T);