Ввести число a решите неравенство ax< -5 на паскале с if the else 10 класс

Веттуня Веттуня    2   29.04.2019 12:35    1

Ответы
Янрей Янрей  09.06.2020 02:28

var a: integer;

begin

var infinity:=#8734;

var elementOf:=#8712;

writeln('ax < -5');

write('Введите a: ');

readln(a);

if a = 0 then

begin

writeln('Нет решений');

exit;

end;

if a > 0 then

writeln('x '+elementOf+' (-'+infinity+'; ',(a/-5),')')

else

writeln('x '+elementOf+' (',(a/-5),'; +'+infinity+')');

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика