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

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

Question

Эммануилыч

29 декабря, 16:39

+4

Ответы (1)

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

Машоня · Answer 1

Var a: integer;

begin

Readln (a) ;

if (a=1) then

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

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

end.

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