Люди, помогите написать на паскале программу. S=-sin0,1+sin0,2-sin0,3+...+sin2

На Бейсике знаю
n=1, S=0
FOR a=0.1 TO 2 STEP 0.1
S=S+(-1)^n*SIN(a)
n=n+1
NEXT a
PRINT S
Блок-схема будет выглядеть так