Решить в целых числах уравнение ( ax - b ) / ( cx - вопрос №95457280 от ChocoPie12 04.07.2022 05:14

Question

Информатика: Решить в целых числах уравнение ( ax - b ) / ( cx - d ) = 0. входные данные вводятся 4 числа: a, b, c и d выходные данные вывести значения корней и их количество, вывести фразу нет корней при их отсутствии и вывести фразу solution если корней бесконечно много. программа на pascal

ChocoPie12 · Answer

program n5;uses crt;var a,b,c,d,x:integer;beginread (a,b,c,d);if (b=0) and (a 0)then write( solution );if (b 0) and (a=0)then write( нет корней );if (b 0) and (a 0) and (b mod a=0) then write (-b div a);readln;end....