Программа на Delphi. Циклы с условием

[Mad_Cat]

x:=0.5;dx:=0.02;
repeat
writeln(2*x-3*ln(x)-3);
x:=x+dx;
until x>0.6;

[dosha]

x:=0.5;dx:=0.02;
while(x<=0.6) do
begin
writeln(2*x-3*ln(x)-3);
inc(x,dx);
end;

[Koksa]

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

x:=0.5;dx:=0.02;
repeat
writeln(2*x-3*ln(x)-3);
x:=x+dx;
until x>0.6;

спасибо! щас попробую, как найду зарядку от мышки(

[Koksa]

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

x:=0.5;dx:=0.02;
while(x<=0.6) do
begin
writeln(2*x-3*ln(x)-3);
inc(x,dx);
end;

о, спасибо))

[Mad_Cat]

Procedure Inc(var X,N: LongInt]);

Прибавляет единицу или N к переменной X.

X - переменная перечислимого типа или типа PChar, если допускается расширенный синтаксис, и N - выражение целочисленного типа.

Inc (X) соответствует инструкции X := X + 1, и Inc (X, N) соответствует инструкции X := X + N.

Процедура Inc генерирует оптимальный код и особенно полезна в длительных циклах.

Процедура Inc увеличивает, порядковую переменную переданную ему.
Вы можете увеличить:

Символы
Числа без плавающей запятой
Перечисляемые типы
Указатели

2dosha
так что

inc(x,dx);

вряд ли буит работать