Question

Запишите на языке Паскаль выражение,которое истинно,если переменная х принадлежит заштрихованной области
С 1 по 4

Answer 1

1) (x>1) and (x<2)

2) x>=3

3) (x<1) or (x>3)

4) (x>=1) and (x<3)

Answer 2

1)
var x: real;
begin
writeln('введите x');
readln(x);
if (1<x) and (x<2) then writeln('верно') else
writeln('неверно');
end.

2)
var x: real;
begin
writeln('введите x');
readln(x);
if (x>3) or (x=3) then writeln('верно') else
writeln('неверно');
end.

3)
var x: real;
begin
writeln('введите x');
readln(x);
if (x<1) or (x>3) then writeln('верно') else
writeln('неверно');
end.

4)
var x: real;
begin
writeln('введите x');
readln(x);
if ((1>x) or (1=x)) and (x<3) then writeln('верно') else
writeln('неверно');
end.