РЕШИТЕ ПОЖАЛУЙСТА!! program n_9;
var х, a, b: real;
begin
writeln ('Определение принадлежности точки отрезку');
write ('Введите а, b>>');
readln (а, b) ;
write ('Введите х»');
readln (х);
if (х>=а) and (x<=b) then
writeln ('Точка принадлежит отрезку')
else writeln ('Точка не принадлежит отрезку')
end.
На этот вопрос еще никто не ответил. Напишите свой ответ или воспользуйтесь поиском:
Новые вопросы