1) если маска подсети 255.255.255.240 и ip-адрес компьютера в сети 192.168.156.235, то номер компьютера в сети равен

Маска подсети показывает, какие биты адреса относятся к адресу сети, а какие - к адресу внутри сети. переводим в двоичную систему счисления маску: 255.255.255.240 = 11111111.11111111.11111111.11110000 там, где стоят 1, биты адреса компьютера относятся к адресу сети, где 0 - внутри сети. так как нас интересует адрес внутри сети, то нужно смотреть, чему равны последние 4 бита адреса (там в маске нули). 235_10 = 11101011_2 последние 4 бита = 1011_2 номер компьютера в сети 1011_2 = 11_10. ответ: 11

program programxy; const n=100;

var inputtext : integer; begin    randomize;

var x : = random(n) + 1;

var y : = random(n) + 1;

var z : = x - y;

writeln('решите пример: ', x, ' - ', y, ' = ');

readln(inputtext);

if inputtext = z then      writeln('правильно! ')

else      writeln('вы ошиблись! правильный ответ: ', z)

end.

 

где-то так это выглядит на паскале. ошибки не обработаны, так что, если вместо числа ввести строку - программа умрет по исключению.

 

program xxx;

  var i, j, k, min : integer;

              a: array[1..10, 1..20] of integer;

              b: array[1..10] of integer;

begin

    for i: =1 to 10 do

        for j: =1 to 20 do

              readln(a[i,j]);

    for i: =1 to 10 do

      begin

        b[i]: =0;

        for j: =1 to 20 do

            b[i]: =b[i]+a[i,j];

      end;

    min: =b[1]; k: =1;

    for i: =2 to 10 do

        if b[i]< min then begin max: =b[i]; k: =i end;

    writeln('наименьшая сумма элементов =', min);

    writeln('она находится в строке -', k);

    readln

end.