СОСТАВТЕ БЛОК СХЕМУ алгоритма ** языке Поскаль для решения вычесления значения...

Question

СОСТАВТЕ БЛОК СХЕМУ алгоритма на языке Поскаль для решения вычесления значения функции,заданной следующим образом

---

Answer 1

Ответ:

var x, y: integer;

begin

   readln(x);

   if x > 0 then y := x * x * x

   else y := 1 + x;

   writeln(y);

end.

---

Comments

Спасибр очень выручил