Question

Проверь, принадлежит ли число, введенное с клавиатуры интервалу от -10 до
3

Answer 1

var x:real;
begin
write('x=');
readln(x);
if (x>10)and(x<3) then write('принадлежит')
else write('не принадлежит');
readln
end.