Какой из операторов цикла имеет 2 вида записи for while… repeat… верного ответа нет

For он может идти с нарастанием for i: =1 to 10 do и с убыванием for i: =10 downto 1 do

Одним из таких свойств является дискретность. под дискретностью понимается то, что алгоритм состоит из описания последовательности шагов обработки, организованный таким образом, что в начальный момент задаётся исходная ситуация, а после каждого следующего шага ситуация преобразуется на основе данных, полученные в предшествующие шаги обработки. дискретность алгоритма означает, что он исполняется по шагам: каждое действие, предусмотренное алгоритмом, исполняется только после того, как закончилось исполнение предыдущего.

Var i,x1,x2: integer; y: real; begin writeln('введите х нач и х конечное'); readln(x1,x2); writeln('введите шаг для х'); readln(i); while x1< =x2 do     begin           if sin(x1)/cos(x1)< > 0 then               begin                         y: =(sin(x1)+2*cos(x1))/(sin(x1)/cos(x1));                         writeln(x1: 4,y: 10: 2);               end;             x1: =x1+i;     end; end.