Написать на Паскале программу. Вывести на экран все трехзначные числа, сумма квадратов цифр которых равна 105. В программе должен быть контроль, является ли число трехзначным.

Тут контроль отдельный не нужен, поскольку программа порождает только трехзначные числа.

спасибо!

Пожалуйста

// PascalABC.NET 3.2, сборка 1439 от 09.05.2017// Внимание! Если программа не работает, обновите версию!begin  for var i:=1 to 9 do    for var j:=0 to 9 do      for var k:=0 to 9 do        if i*i+j*j+k*k=105 then Write(i,j,k,' ');  Writelnend.Результат458 485 548 584 845 854