Есть ответ 👍

1.Не себепті технологиялар жылдам дамып жатыр?
2.Неліктен адам роботтарды пайдаланады очень

210
233
Посмотреть ответы 1

Ответы на вопрос:


Program myprg; var x,y: integer; begin writeln('x='); read (x); if (x> =0) then y: =0; if (x> 0) and (x< =1) then y: =x else y: =sqr(sqr(x)); writeln ('y=',y); end.

Популярно: Информатика