var i:integer;
begin i:=10;
      for i:=1 to i do
          write(i);
      readln;
end.

Можете объяснить, почему это работает? По логике, начальное значение i сменяется присвоением i:=1, и цикл должен прогоняться всего лишь один раз. Тем не менее, этот код работает не так и цикл проходит 10 раз. Почему?

Нет, иначе. Повторения идут от первого значения (i:=1 ) до последнего (i=10)

Неправда... Сначала запоминаются начальное и конечное значение цикла, и только потом начинается присвоение i := 1, то есть цикл в любом случае будет прогоняться 10 раз...

2Ozzя, volvo: Понятно, благодарю.