# Given the number y when entering the number x from the keyboard, it should output it equal to y, if y = 1, if x≥1. y = 0 if -1

October 1, 2021 | education

| Program sootnoshenie;

var x, y: integer;

begin

writeln (‘enter any number from the keyboard’);

readln (x);

if x> = 1 then

y: = 0;

if (x> = -1) and (x <= 1) then

y: = 0;

if x <0 then

y: = -1;

writeln (y);

end.

(The program works, tested in PascalABC)

One of the components of a person's success in our time is receiving modern high-quality education, mastering the knowledge, skills and abilities necessary for life in society. A person today needs to study almost all his life, mastering everything new and new, acquiring the necessary professional qualities.