Найдите все решения х2+у2+z2=2019 натуральных числах

я решала с программирования.составила программу

program pic; var k,o,t: integer; beginfor k: =1 to 9 dofor t: =1 to 9 dofor o: =1 to 9 doif (100*k+10*o+t)-k=100*k+10*t+o then writeln(100*k+10*o+t,'-',k,'=',100*k+10*t+o); readln; end.

получились ответы:

921-9=912

932-9=923

943-9=934

954-9=945

965-9=956

976-9=967

987-9=978

1) 2 * 600 = 1200 (км) - пролетел самолет за 2 часа

2) 2000 - 1200 = 800 (км) - осталось пролететь

3) 800 : 400 = 2 (ч) - потратил на остальной путь

4) 2 + 2 = 4 (ч) - затратил на весь путь