Question

Напишите программу, которая вводит с клавиатуры целое число х – координату точки на числовой прямой и проверяет, принадлежит ли введенное число х заштрихованной области

Answer 1

var a,b,x:real;

begin

readln(a);

readln(b);

readln(x);

if (x<b) and (x>a) then writeln('da')

else writeln('net');

readln;

end.