Это вы сравнили быстродействие при работе с целыми числами.
Если будет время, проведите аналогичный тест на вещественных числах: добавить в цикл какую нибудь мат. операцию (синус, логарифм).
Критика справедливая.
Провел дополнительные эксперименты. Все условия теста прежние, за исключением программы - она теперь имеет следующий вид:
for i:= 1 to Imax do
j := j + 1;
tmpR := tmpR + 1;
end_for;
где tmpR - переменная типа Real.