В данном фрагменте находят сумму первых десяти четных чисел :
сначала сумма s:=0, затем перебирают числа от 1 до 10 (for i:=1 to 10) и в сумму добавляют не само число i, а его удвоенное значение (2*i), т.е. находят сумму 2 + 4 + 6 + ... + 20.
В данном фрагменте находят сумму первых десяти четных чисел :
сначала сумма s:=0, затем перебирают числа от 1 до 10 (for i:=1 to 10) и в сумму добавляют не само число i, а его удвоенное значение (2*i), т.е. находят сумму 2 + 4 + 6 + ... + 20.