Напишите программу на языке Паскаль: Выяснить принадлежит ли точкаX отрезку от 1 до 10?

Буду очень благодарна)

Question

Дроня

14 октября, 21:53

+3

Ответы (1)

Знаешь ответ?

Ян · Answer 1

Var a: integer;

begin

Readln (a);

if (a=1) then

Writeln ('принадлежит')

else Writeln ('не принадлежит')

end.

Напишите программу на языке Паскаль: Выяснить принадлежит ли точкаX отрезку от 1 до 10?Буду очень благодарна)