Дана блок-схема. Составить программный код​

Question

Дана блок-схема. Составить программный код​

---

Comments

Программный код на Паскале или алгоритмическом языке?

---

паскаль

Answer 1

program z1;

  label 1;

  var s,k: real;

    begin

      s:=0;

      1:if s

                       k:=sqr(s);

                       writeln(k);

                       s:=s+0.2;

                       goto 1;

                       end

                    else end.