Задача на массивы, Помогите пожалста Опции

[Zoom]

Дан массив из 5 вещественных чисел в нём надо найти элемент в котором наибольшее кол-во подряд идущих нулей нулей.

[Client]

А не подскажите ли условие при котором проверяется достигла ли дробная часть целого числа, а то я понял что frac не подходит в цикле с предусловием?

Т.е. если было 0,123 то тебе надо чтоб стало 123? тогда

while frac(x)>0 do x:=x*10

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

while frac(x)>0.00000001 do x:=x*10

Сообщение отредактировано: Client - 22.03.2008 19:26