Что такое функций пользователя и какие ихние значения?

разбиваем числа на триады (группы по 3 числа в каждой), и смотрим значение по таблице, получается:

1) 6224

2) 64472

program divisors;

var

n,i: integer;

begin

readln(n);

for i: =n downto 1 do if n mod i = 0 then write(i,' ');

end.

нарисовать отрезок

нарисовать два круга с радиусами равными длине отрезка на концах отрезка

взять одну из точек пересечения кругов

соеденить точку с концами отрезка

256 цветов - это 1байт на пиксел

один экран = 640*480*1байт = 300 кб

значит только один эран и вместится