Сколько раз выполнится цикл и что будет выдано на печать?
Var i, k:integer;

k:=0;
for i:=5 to 5 do k:=i; write(k);
Выполняется в PascalABC.NET

Ответа на этот вопрос пока нет. Попробуйте найти его через форму поиска.

Вас заинтересует