Здрасти Друзья! Учитель попросил досконально объяснить каждую строку в Программках,

Здравствуйте Друзья! Учитель попросил подробно разъяснить каждую строку в Программках, растолкуйте мне пожалуйста их
Вот одна из их остальные кину в коменты
var a,b,n:integer;
begin
writeln('введите колличество чисел');
read(n);
a:=0;
for b:=1 to n do a:=a + b*2;
writeln(a);
end.