Задание 13 Параграф 3.4 ГДЗ Босова 8 класс (Информатика)

Напишите программу, вычисляющую значение функции:

$$y=\begin{cases}-1, & x<0,\\0, & x=0,\\1, & x>0.\end{cases}$$

Нужно написать программу, которая по значению $$x$$ определяет значение функции:

$$y= \begin{cases} -1, & x<0,\\ 0, & x=0,\\ 1, & x>0. \end{cases}$$

Для этого достаточно использовать цепочку условий: если $$x<0$$, то $$y=-1$$; иначе, если $$x=0$$, то $$y=0$$; во всех остальных случаях $$y=1$$.

program xy;
var
  x, y: integer;
begin
  readln(x);
  if x < 0 then y := -1 else if x = 0 then y := 0 else y := 1;
  writeln(‘y=’, y);
end.

При $$x=-5$$ получаем $$y=-1$$, при $$x=0$$ — $$y=0$$, при $$x=5$$ — $$y=1$$.

Ответ

Программа на Pascal:

program xy;
var
  x, y: integer;
begin
  readln(x);
  if x < 0 then y := -1 else if x = 0 then y := 0 else y := 1;
  writeln(‘y=’, y);
end.