Два натуральных числа называют дружественными, если каждое из них равно сумме всех делителей
другого, кроме самого этого числа . найти все пары
дружественных чисел, лежащих в диапазон е от п до k.

только  25-18=7 человек

только французский 27 - 18 = 9 человек

ну а на вопросы не отвечу =))

сохранить информацию о наблюдаемом объекте 

передать информацию о нём другим людям

испытать на модели работу объекта ,если испытание объекта-оригинала  опасно или дорого

program divisors;

var

n,i: integer;

begin

readln(n);

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

end.

var a,b,c: integer;

begin

clrscr;

readln(a,b,c);

          if a = b then writeln(c);

          if b = c then writeln(a);

          if a = c then writeln(b);

readkey;

end.