ТутРешу.Ру

Написать программу на паскале для решения неравенства (-ax) /

Задание:

Написать программу на паскале для решения неравенства (-ax) / (x-b) >0 с помощью операторовif

Решение:

Пфф легко! var a, x, b: real; begin read (a,x,b); if (a<0) and (b < 0) then begin //если Я правильно выразил х то i: =x*(ab-a); writeln ('x пренадлежит от ',i); write (' до плюс бесконечность'); end; else writeln ('Дебыл, ты неправильно ввел либо а либо b'); end.




Знаете другой ответ?

Отправить свой ответ