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

Question

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

на паскаль!!!

Comments

pascal abc?

---

не важно

Answer 1

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

Answer 2

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