Как формируется индивидуальное информационное пространство?

Оно формируется за счёт настройки пользовательского интерфейса ОС и приложений. Пользователь имеет возможность не только работать с информационными ресурсами создаными другими но и сделать доступными для других результаты своего труда

Объяснение:

☝

program xxx;

    var i, k, d, e, s : integer;

begin

  k: =0;

  for i: = 10 to 99 do

    begin

          d: = i div 10;

          e: = i mod 10;

          s: =d + e;

          if i mod s = 0 then k: =k+1

    end;

    write ('кол-во чисел которые делятся на сумму своих цифр=', k);

    readln

end.

program xxx;   var a, b, min : integer; begin  write('введите число а=');  

    readln(a);

  min: =10;   while a < > 0 do      begin            b: = a mod 10;             if b < min then min: =b;             a: = a div 10      end;     writeln('минимальная цифра = ', min);   readlnend.