Question

Дам 40 баллов срочно

Answer 1

Ответ:

Для 1 задания

var

x, a, b, c:integer;

begin

read(x);

if ((x >= -5) and (x <= 10)) write("true")

else write("false");

end.

Для 2 задания

var

x, a, b, c:integer;

begin

read(x);

if ((x >= 100) and (x <= 999)) write("true")

else write("false");

end.

Для 3 задания

var

x, a, b, c:integer;

begin

read(a, b, c);

if ((a = b) and (b = c)) write("true")

else write("false");

end.

Объяснение: