Решить уравнение 1998 х-2002 у=2 ху

Вообще, эта задача скорее из области диофантовых уравнений.

Тривиальное решение: x = 0, y = 0.

Общее решение искать - утомительное занятие.

Можно уравнение записать в другом виде

(1001+x) (999-y) = 1001*999, можно разложить на множители 1001 = 7*11*13,

999 = 37*3*3*3, что вообще говоря, не дает явного решения.

Программа:

var i, k, n: integer;

begin

for i:=1 to 900 do

begin

k: = (1001*i) div (999-i) ;

n: = (1001*i) mod (999-i) ;

if n=0 then writeln ('x = ', k,' y = ', i) ;

end;

end.

x = 220 y = 180

x = 286 y = 222

x = 442 y = 306

x = 1078 y = 518

x = 1330 y = 570

x = 1456 y = 592

...

x = 7546 y = 882

x = 8008 y = 888

x = 9100 y = 900