Question

Написать программу, проверяющую принадлежит ли число, введенное с клавиатуры, интервалу (3; 8)

Answer 1

Ответ:

pascal

Объяснение:

var n:integer;

begin

 Write('Введите число: ');

 ReadLn(n);

 if (n>3) and (n<8) then  

   WriteLn('Принадлежит')

 else

   WriteLn('Не принадлежит');

end.