Есть ответ 👍

Решить в целых числах уравнение ( ax + b ) : ( cx + d ) = 0. входные данные вводятся 4 числа: a, b, c и d; c и d не равны нулю одновременно. выходные данные необходимо вывести все решения, если их число конечно, “no” (без кавычек), если решений нет, и “inf” (без кавычек), если решений бесконечно много. примеры входные данные 1 1 2 2 выходные данные no входные данные 2 -4 7 1 выходные данные 2

178
389
Посмотреть ответы 2

Ответы на вопрос:


(ax + b ) : ( cx + d ) = 0сводим уравнение к системе: { ax + b = 0{ cx + d ≠   0{ ax = -b{ cx  ≠   -d можно учесть все случаи, используя  больше  16 условий, но я предпочту  более  оптимальный вариант, так как знаю как зависит количество корней линейного уравнения от коэффициентов. программа на паскале: var a, b, c, d: real; begin   read(a, b, c, d);   if (c = 0) and (d = 0) then writeln('no')   else if (a = 0) and (b = 0) then writeln('inf')   else if a = 0 then writeln('no')    else if c = 0 then writeln(-b/a)   else if b/a = d/c then writeln('no')   else writeln(-b/a) end.

Var a: array[1..5,1..5]of integer; i,j,k: integer; begin   for i: =1 to 5 do       begin         writeln;           for j: =1 to 5 do                 begin                   a[i,j]: =random(21)-10;                     write(a[i,j]: 4);                       if a[i,j]=1 then                         k: =k+1;                 end;       end; writeln; if k=0 then     writeln('нет =1') else       writeln(k); end.

Популярно: Информатика