Вывести ** экран каждый 4-ый член последовательности A(k)=(sqrt(sqr(k)+3)). Ответ нужен...

Question

Вывести на экран каждый 4-ый член последовательности A(k)=(sqrt(sqr(k)+3)).
Ответ нужен на языке Pascal.

Comments

k вводится пользователем?

---

И сколько их выводить? По заданному к?

Answer 1

//PascalABC.NET 3.2 сборка 1318

Var
  k,i:integer;
begin
i:=0;
readln(k);
while i  begin
    i+=4;
    writeln(sqrt(sqr(i)+3));
  end;
end.

Пример ввода:
12
Пример вывода:
4.35889894354067
8.18535277187245
12.1243556529821