Question

Напишите программу в Паскале

Answer 1

===== PascalABC.NET =====

begin

 var s := 0.0;

 foreach var n in Range(99, 3, -3) do

   s := Sqrt(n + s);

 Println(s)

end.