Проанализируем дамп памяти произвольного пакета Ping. Что* находится в самом начале пакета? По какому адресу* в пакете указан IP получателя?
*Здесь и далее: номер первого байта информации в шестнадцатеричной системе
По какому адресу в пакете указан IP отправителя?
По какому адресу в пакете начинаются сами передаваемые данные?
По адресу 17 в пакете записано некоторое число. Укажите его

( Решение на Pascal )

Не совсем ясно, каким образом составители задачи планировали найти среди случайных вещественных 10 чисел в диапазоне от -60 до 100 числа, кратные 8.

Но ради Бога:

var A: array [1..10] of real;

var i,s: integer;

begin

s:=0;

randomize();

for i:=1 to 10 do

 begin

 A[i]:=random()*160-60;

 write(A[i]:3:5,' ');

 if (A[i]>10) and (A[i]-trunc(A[i])=0)  

 and (trunc(A[i]) mod 8 =0) then

 s:=s+1;

 end;

writeln();

writeln('Количество элементов массива,',

'кратных числу 8 и больших 10: ',s);

end.

5 раз.

Объяснение:

В заголовке цикла указываются два значения. Первое значение присваивается так называемой переменной-счетчику, от этого значения начинается отсчет количества итераций (повторений). Отсчет идет всегда с шагом равным единице. Второе значение указывает, при каком значении счетчика цикл должен остановиться. Другими словами, количество итераций цикла определяется разностью между вторым и первым значением плюс единица.

program cycle;

var a,k:integer;

begin

 for k:= 1 to 5 do

   writeln(k);

end.