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

думаю, что 19,5 кб = 0,019 мб.

var

i: integer;

begin

for i: =100 to 999 do

if ((i+1) mod 2=0) and ((i+2) mod 3 =0) and ((i+3) mod 4=0) and ((i+4) mod 5 =0)

then writeln(i);

end.

решение на

max: =a[1];

for i: =2 to 10 do

begin 

if a[i]> max then

max: =a[i];  

c: =i;  

  end;

min: =a[1];

for i: =2 to 10 do

begin

if a[i]< min then

min: = a[i];

d: =i;

end;

a[c]: =x;

a[c]: =a[d];

a[d]: =x;  

это кусочек программы в паскале для нахождения максимального элемента на скоко я помню