Решить в целых числах уравнение ax + b = 0. входные - вопрос №991043202 от kotterbrother 19.03.2020 11:46

Question

Информатика: Решить в целых числах уравнение ax + b = 0. входные данные вводятся 2 целых числа: a и b. выходные данные необходимо вывести все решения, если их число конечно, “no” (без кавычек), если решений нет, и “inf” (без кавычек), если решений бесконечно много. на !

kotterbrother · Answer

Объяснение:Var  a,b:integer;begin  Write( Введите a,b: ); Read(a,b);  if a 0 then    if (b mod a)=0 then Writeln(-b div a) else Writeln( NO )  else    if b=0 then Writeln( INF ) else Writeln( NO )end....