Шаг цикла

[LLIALLIJIbIK]

Возможно ли написать цикл for с шагом меньше единицы? Если да, прошу пример пожалуйста.

[Человек_Борща]

зачем?....

[Stilet]

... Не сразу понял о чем речь )
Нет. Не возможно. в Паскале в цикле ФОР нет шага в принципе. Но можно извратится указав приращение отдельно:

k:double;
...
for i:=1 to 100 do begin
 k:=i/15; // Это следующее значение шага
end;

Как-то так.

[Вадим Мошев]

Возможно ли написать цикл for с шагом меньше единицы?

Да.

for i:=100 DownTo 1 do...

шаг (-1). Минус 1 меньше, чем 1.

А вообще, можно сделать махинации, внутри цикла, но не изменять сам шаг, а предварительно поработать с границами цикла, а шаг внутри дробить. Но удобнее всего пользоваться циклами while и repeat

T:=1;
while T < 10 do
T:=T + 0.001

здесь шаг - одна тысячная

[LLIALLIJIbIK]

Спасибо. Очень помогли.

Сообщение от Вадим Мошев

T:=1;
while T < 10 do
T:=T + 0.001

здесь шаг - одна тысячная

А если компилятор ругается на Incompatible types?

А, нет, все, разобрался

Зато теперь вылетает ошибка application-defined exception (code 0xc00000fd) at 0x73f9e2d4

From Stilet: Ну и зачем кросспост делать? Обсуждай эту ошибку тут.