FPS Решить в целых числах уравнение ( ax + b ) : ( cx + d ) = 0. Вводятся 4 числа: a, b,...

Question

FPS

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

Comments

номер скажи

---

а нашел

---

а ты случайно не из Лицея-интерната им. Макаренка?

Answer 1

Program gt1;
uses crt;
var a,b,c,d,x,s:integer;
begin
read(a,b,c,d);
s:=0;
if (a=0)and(b=0)then s:=1;
if((a<>0)and(b=0))or((a=0)and(b<>0))or((a<>0)and(b<>0))then begin
for x:=-2000000 to 2000000 do
if (a*x+b=0)and((c*x+d)<>0) then begin
write(x,' ');
s:=3;
end;
end;
if s=0 then write('NO');
if(s=1)then write('INF');
end.

Comments

пока мне пора идти у нас час ночи

Answer 2

INF, т.к. если они не равны нулю одновременно.

Comments

это я знаю.....

---

Если a равняется нулю, b равняется нулю - уравнение имеет
бесконечно много решений. Если a равняется нулю, b не равняется нулю - решений нет. В остальных
случаях нужно проверить, делится ли -b на a без остатка (т.к. надо решить уравнение в целых числах),
и если да - вывести результат. Следует учесть, что результат должен быть целого типа, т.е. значение x

---

следует считать не как -b/a (получается что x - типа real (float в Си), и тестирующая система выдаст сообщение об
ошибке), а как -b div a (-b/a в Си).

---

проблема в том что оно на inf ошибку выдаёт........

---

Тогда не знаю

---

да вот и я не знаю....

---

а на другую может знаешь ответ?

---

В каждую крайнюю клетку квадратной доски поставили по фишке. Могло ли оказаться, что выставлено ровно k фишек? (Например, если доска 2 x 2, то выставлено 4 фишки, а если 6 x 6 - то 20).

Вводится одно натуральное число k.

---

получилось?

---

да с фишками получилось)спасибо)