Среди чисел вида 0,25; 0,251,25; 0,251,25*2,25; … найти первое число большее заданного Ана паскаль!!!

Question

Среди чисел вида 0,25; 0,25*1,25; 0,25*1,25*2,25; … найти первое число большее заданного А на паскаль!!!

Гость

Ответ(ы) на вопрос:

Гость

Готово........................

Accepted Answer

var r, A : real; begin readln(A); r := 0.25; while (r < A) do r := r + 1; writeln(r); end.

Среди чисел вида 0,25; 0,25*1,25; 0,25*1,25*2,25; … найти первое число большее заданного Ана паскаль!!!