Ответ(ы) на вопрос:
Гость //PascalABC.NET (версия 3.1, сборка 1196 от 09.03.2016)
var x,y:real;
begin
writeln('Введите Х ');
readln(x);
if x<-2 then y:=8;
if x>2 then y:=-8;
if (x<=2) and (x >=-2) then y:=-x*x*x;
writeln('y = ',y);
end.
Не нашли ответ?
Похожие вопросы