Задачка.

[Cubaholic]

Помогите пожалуйста. Написать программу вот такую:
Найти минимальное число, которое представляется суммой квадратов 4 натуральных чисел не единственным образом.

[KORN]

1) покажи что сам написал, а там уже посмотрим как тебе помочь
2) оформляй тему правильно и читай правила в шапке, тему закроют

[Cubaholic]

Подскажите хотя бы алгоритм пожалуйста. Код я думаю напишу сам.

[evg_m]

самый простой алгоритм

function proverka(x:integer);
var
r1,r2,r3.r4: integer;
begin
//проверяем чмсло на выполение условий задачи
for r1:=1 to x do
for r2:=r1 to x do
for r3:=r2 to x do
for r4:=r3 to x do
if razlogenie(r1,r2,r3,r4, x) then

end;

n:=1;
while not proverka(n) do n:=n+1;
//здесь выводим результат = n

[Cubaholic]

Все. Спасибо. Написал я. Получилась программка на 65 строчек