№3784. если маска подсети 255.255.252.0 и ip-адрес компьютера в сети 226.185.90.162, то номер компьютера в сети

255.255.252.0 переводим каждое из чисел в 2-ю систему 226.185.90.162 и записываем друг под другом 11111111.11111111.11111100.00000000 11100010.10111001.01011010.10100010   находим конъюнкцию поразрядно 11100010.10111001.01011000.00000000     и переводим обратно в 10 сс 226.185.88.0

Const   a=5.1;   x=3.29; var   y,z: double; begin   y: =2*exp(4*x)+arctan(x/a);   z: =cos(x*sqr(x))+sqr(sin(x));   writeln('y=',y,', z=',z) end. результат выполнения программы: y=1038354.42291114, z=-0.472433980670957 const   m=6;   n=8; var   a: array[1..m,1..n] of double;   b: array[1..m*n] of double;   i,j,k,imax,imin: integer;   t: double; begin   // инициализация а и формирование в   randomize;   writeln('исходный массив a');   k: =0;   for i: =1 to m do begin       for j: =1 to n do begin           a[i,j]: =10*random-5; { случайное число на [-5; 5] }           write(a[i,j]: 8: 4);           t: =cos(a[i,j]);           if (t> =0) and (t< 0.5) then begin inc(k); b[k]: =a[i,j] end       end;       writeln   end;   // вывод сформированного массива в   writeln('исходный массив в');   for i: =1 to k do write(b[i]: 8: 4);   writeln;   // поиск максимума и минимума с последующим обменом их местами   imax: =1; imin: =1;   for i: =2 to k do       if b[i]< b[imin] then imin: =i       else           if b[i]> b[imax] then imax: =i;   t: =b[imax]; b[imax]: =b[imin]; b[imin]: =t;   // вывод результирующего массива в   writeln('результирующий массив в');   for i: =1 to k do write(b[i]: 8: 4);   writeln end. тестовое решение: исходный массив a   -1.6788 -0.7273 -3.4919  2.9903 -4.3249 -2.2230 -2.1157  0.9685   2.0515  4.6821  0.2794 -1.4624  4.9668 -3.5754 -3.4115 -0.5592   3.0535  1.1339  0.0992 -0.5307 -0.6266  2.2623  1.9578 -1.3175   -0.6154  3.6080  2.4223 -4.8354 -2.2978  3.8982 -2.2427  2.0410   -1.1019 -3.4703 -2.0104 -1.3044  0.7744  0.6897  3.1747  1.3257   -4.3942 -1.6707 -3.2494 -0.6551  3.4726 -0.2896  3.4154  1.9644 исходный массив в   -1.4624  4.9668  1.1339 -1.3175 -4.8354 -1.1019 -1.3044  1.3257 результирующий массив в   -1.4624 -4.8354  1.1339 -1.3175  4.9668 -1.1019 -1.3044  1.3257

Не знаю пишут ли тут готовый код, но я ****** писать его, но попробую схемой.  насчет диапазона я не понял точно, его тебе весь дали или в форме 1-10 или каждое число крч я пишу общее решение а ты уже подумаешь как в твоей ситуации работать 1. берешь все делители числа  что бы сделать это ты узнаешь число и делишь в цикле от 1 и дальше i++, понятное нужны только такие делители про котором остаток будет 0 т.е делаешь проверку на то что бы (% == 0) если равно записываешь число(в массив или какт придумаешь), нет - идешь по циклу дальше проверяешь пока i! =твоему числу (это и нормально цикл намутит и сразу исключит самое число в качестве делителя) если цикл закончился суммируешь всё что достал и проверяешь равна ли эта сумма твоему числу, если да используешь cout а в нем начальное число если нет идешь ко второму и заново схема для такой махинации нужен наверно будет еще 1 цикл поверх этого с проверкой на то что твое число не равно конечному в диапазоне/ надеюсь тебе хотя бы немного.