Написать программу, которая определяет, принадлежит ли заданное число интервалу от 10 до 30.

Question

Информатика

Доната

23 мая, 18:25

Написать программу, которая определяет, принадлежит ли заданное число интервалу от 10 до 30.

+3

Ответы (1)

Знаете ответ на вопрос?

Нуня · Answer 1

Var a, b, x:integer;

begin

writeln ('введите число x:') ;

readln (x) ;

writeln ('введите интервал от a до b:') ;

readln (a, b) ;

if (x>=a) and (x<=b) then writeln ('x принадлежит данному интервалу') else

writeln ('x не принадлежит данному интервалу') ;

readln;

end.