= √2+√2+√2+⋯√2
По заданному натуральному числу n вычислите
Вводится натуральное n  100. Выведите значение указанного выражения с точностью до 4 значащих цифр после десятичной точки.

1. program task31146235;
2. var
3.  S: real;
4.  n: integer;
5. begin
6.  n := ReadlnInteger('n = ');
7.  for var i := 1 to n do
8.    S += Sqrt(2);
9.  Writeln(Format('S = {0:0.0000}', S));
10. end.