Вопрос:
FPS
Решить в целых числах уравнение ( ax + b ) : ( cx + d ) = 0. Вводятся 4 числа: a, b, c и d; c и d не равны нулю одновременно. Необходимо вывести все решения, если их число конечно, “NO” (без кавычек), если решений нет, и “INF” (без кавычек), если решений бесконечно много
- 07.05.2018 18:06
- Другие предметы
- remove_red_eye 6803
- thumb_up 34
Ответы и объяснения 2
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((a0)and(b=0))or((a=0)and(b0))or((a0)and(b0))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.
- 09.05.2018 02:27
- thumb_up 18
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Другие предметы.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
В данном разделе публикуются вопросы и ответы на них к непопулярным предметам.