проблемы с циклом for.. to..do

[paloit]

не знаю все без ошибок - Делфи 7. консоль.
прикрепляю.
Интересно, конечно...

[Sazary]

paloit Думаю, у вас просто отключен показ варнингов.
Project -> Options ->Compiler Messages -> Show Warnings

[paloit]

может
я его и не включал.
хм..

[pomoshnic]

У меня тоже выводит 3;

var c,k,i:integer;
begin
k:=0;
for i:=1 to k+3 do
begin
k:=k+1;
inc(c);
end;
writeln(c);
readln
end.

[Serge_Bliznykov]

насколько я помню, вычисление границ цикла FOR в Pascal/Delphi осуществляется ОДИН раз, до начала выполнения цикла. Проверяется это ОЧЕНЬ легко, достаточно в границах цикла поставить вызов своей функции, а в ней поставить точку останова (или вывод отладочного сообщения) и потом оттрассировать программу....
Но цикл-циклу рознь. Похоже, Ваш препод перепутал с циклом типа While ... do - вот там-то (если мне память не изменяет) условие и проверяется каждый раз...

[BIS88]

Serge_Bliznykov полностью с тобой согласен, препод тупит. делфи проверяет начальное и конечное значение цикла один раз, перед началом выполнения. вот наверное и получается такая канетель. А по поводу того что выводиться у кого то 4 и 3. так это вывод значения необходимо осуществлять в теле цикла, а не после. если у кого то еще есть мнения делитесь.

[EvKont]

i = 4 а k = 3 потому счетчик прибавляет 1 к i но сам цикл не выполняется

[BIS88]

Сообщение от EvKont

i = 4 а k = 3 потому счетчик прибавляет 1 к i но сам цикл не выполняется

это верно, так как i равно 1 а не 0, поэтому и выводит 4,3. Так что можно сделать вывод что в делфи этот цикл будет выполняться 3 раза???

[Sazary]

Так что можно сделать вывод что в делфи этот цикл будет выполняться 3 раза???

Именно.
Лучше использовать отдельный счетчик, а не i.

[pomoshnic]

Сообщение от Sazary

Именно.
Лучше использовать отдельный счетчик, а не i.

Например вот так:

Сообщение от pomoshnic

var c,k,i:integer;
begin
k:=0;
for i:=1 to k+3 do
begin
k:=k+1;
inc(c);
end;
writeln(c);readln
end.