Если имелся ввиду Шеннон, то:
Это американский инженер, а так же математик. Основатель теории информации. Предложил использовать слово "бит" для обозначения наименьшей единицы информации.
Const
N = 33;
Var
A:array[1..N] of integer;
i,c,p:integer;
Begin
c:=0;
p:=0;
Randomize;
Write('Исходный массив:');
For i:= 1 to N do
Begin
A[i]:=random(2*N+1)-N;
Write(' ',A[i]);
if A[i] mod 2 = 0 then c:=c+1;
if (A[i] mod 5 = 0)and(A[i] mod 10 <> 0) then p:=p+1
End;
WriteLn;
WriteLn('Количество чётных чисел: ',c);
WriteLn('Количество чисел, оканчивающихся на 5: ',p);
End.
Ответ:
import random
def gen_rnd_array(rng):
array = []
for i in range(rng):
array.append(random.randint(1,10000))
return array
def get_max_hex(arr):
HArray = []
for item in arr:
str_item = str(hex(item))
if (str_item[len(str_item)-1:len(str_item)]).lower() == 'f':
HArray.append(item)
return HArray
def main():
array = gen_rnd_array(40)
HArray = get_max_hex(array)
if len(HArray) == 0:
print(0)
else:
print(max(HArray))
if __name__ == '__main__':
main()
Объяснение:
Программа делает вид, что работает корректно. Подобный алгоритм довольно сложно проверить в ручную. Так как не указано, на каком конкретно языке выполнять задание, я выполнил его, используя средства Python. Если вас устраивает это решение, ниже приведён скриншот исходного кода, так как сайт ломает табуляции. Если вам нужно просто скопировать и не париться, я могу залить этот код на сервис pastebin и в комментарии к ответу отправить ссылку.
Doc - текстовый.
html - скорее всего, тоже текстовый. а вообще это веб страница