Дано: fori: =1to28do при последнем выполнении тела цикла i=

ответ 28

логично же 

for i:=1 to 28 do (пробелы нужны, иначе не скомпилируется)
для i от 1 до 28 т.е
i:=1 -> выполняется тело
i:=2 -> выполняется тело
i:=3 -> выполняется тело
...
i:=28 -> выполняется тело