Весьма странное поведение программы

← →
olookin (2002-02-22 17:24) [39]

Уважаемые господа!

Теряясь в догадках, я сделал небольшую (и как кажется не имеющую значения модификацию) в программе. Именно, часть кода:

procedure Duplet1.Control_iso;
var k,c: integer;
begin
for k:=0 to 511 do for c:=0 to trunc(2.0/TT)-1 do Takt(0);
end;

заменяется на:

procedure Duplet1.Control_iso;
var k,c: integer;
begin
for k:=0 to 511 do for c:=0 to trunc(2/TT)-1 do Takt(0);
end;

Обратите внимание на то, что вместо величины 2.0 я использую 2.
Как это не смешно, результат работы программы СТАЛ ПРАВИЛЬНЫМ.

Весьма странное поведение программы Найти похожие ветки