Ну если букву то вкладка которая содержит команды отвечающие за перемещение обьекта это B - анимация
Ответ:1
2
3
4
5
6
7
8
9
10
11
12
var
i,n,s:integer;
begin
repeat
write('N=');
readln(n);
until n>0;
s:=0;
for i:=1 to n do
s:=s+i;
writeln('Summa:',s);
end.