3. Сколько раз выполнится тело цикла во время выполнения фрагмента программы for i:=140 to 140 do S:=S+1;
1 раз. Проверено в самом Паскале.