№1 var s,x,n,i:integer;begins:=0;write('Введите количество чисел: ');readln(n);writeln('Введите числа: ');for i:=1 to n dobeginreadln (x);s:=s+xend;writeln('Сумма чисел равна ',s);end.
№2 var n,i,p:integer;beginp:=1;write('Введите количество чисел: ');readln(n);for i:=1 to n dop:=p*i;writeln('Произведение чисел равнo ',p);end.
Подробнее - на Znanija.com -
znanija.com/task/14923730#readmore
Известно, что с помощью N бит можно закодировать 2N<span> различных чисел. Поскольку 2</span>6<span> < 87 < 2</span>7<span> и для каждого спортсмена число бит одинаково, то для записи каждого из 87 номеров необходимо 7 бит памяти. Поскольку промежуточную отметку прошли 64 участника, то информационный объем сообщения составит 64⋅7 = 448 бит = 56 байт.</span>
Рассмотрим третий байт IP-адреса узла и IP-адрес сети. Распишем в двоичном виде:
94 = 01011110
80 = 01010000
Первые два байта маски равны 255, так как байты узла и сети совпадают.
Для определения третьего байта маски сети найдем число первых бит, которые совпадают. Совпадают 0101, поэтому число первых бит равно 4, а сам третий байт маски равен 11110000, то есть 240.