Составьте программу по этой блок схеме.Паскаль. Заранее спасибо.

Question

Составьте программу по этой блок схеме.Паскаль. Заранее спасибо.

---

Answer 1

var
x,y:integer;

begin 
write('x: '); 
readln(x);
if x<=-12 then y:=-x*x</strong>
else if x<0 then y:=sqr(x)*sqr(x)</strong>
else y:=x-2;
writeln(y);
end.

Comments

спс

---

обнови

---

чтобы увидеть

---

большое спасибо