Дано число а (1 меньше а меньше =1.5). Среди чисел 1+1/2, 1+1/3, ... найти первое,меньше а
Дано число а (1<а<=1.5). Среди чисел 1+1/2, 1+1/3, ... найти первое,меньше а
Гость
Ответ(ы) на вопрос:
Гостьvar a: real;
begin
readln(a);
a := Ceil(1/(a-1) + 1e-15);
writeln(a, ' -> ',1+1/a);
end.
Не нашли ответ?
Похожие вопросы