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Потом число 3s := 7 + 2*3 = 13Потом число 4 s := 13 + 2*4 = 21И вот наконец, число 5s := 21 + 2*5 = 31И в конце командой WriteLn(s) ты выведешь число 31 на экран.