Var s, i: integer;
Begin
s := 3;
For i := 2 to 5 do
s := s + 2*i;
Writeln(s);
End.

объясните пожалуйста как решать такое, вот как я понимаю s присвоили значение 3, после чего в цикле повторить 3 раза действия: s(т.е.3) + 2*I(но что такое i? для i = от 2 до 5( т.е. это тоже 3?)) или надо решать как то по другому?

For i := 2 to 5 do s := s + 2*i;

Это цикл, то есть он будет повторяться n-ое число раз, в твоем случае пока i не будет равняться 5.
Значит, сначала переменной i присваивается число 2 значит
s := 3 + 2*2 = 7
Потом число 3
s := 7 + 2*3 = 13
Потом число 4 
s := 13 + 2*4 = 21
И вот наконец, число 5
s := 21 + 2*5 = 31

И в конце командой WriteLn(s) ты выведешь число 31 на экран.