895 =37F
895/16=55 остаток 15=F
55/16=3 остаток 7
3/16=0 остаток 3
1051 = 10000011011
1051/2=525 остаток 1
525/2=262 остаток 1
262/2=131 остаток 0
131/2=65 остаток 1
65/2=32 остаток 1
32/2=16 остаток 0
16/2=8 остаток 0
8/2=4 остаток 0
4/2=2 остаток 0
2/2=1 остаток 0
1/2=0 остаток 1
258 =102
258/16=16 остаток 2
16/16=1 остаток 0
1/16=0 остаток 1
4441 =10531
4441/8=555 остаток 1
555/8=69 остаток 3
69/8=8 остаток 5
8/8=1 остаток 0
1/8=0 остаток 1
4F =1001111
79/2=39 остаток 1
39/2=19 остаток 1
19/2=9 остаток 1
9/2=4 остаток 1
4/2=2 остаток 0
2/2=1 остаток 0
1/2=0 остаток 1
716 =1CE
462/16=28 остаток 14=E
28/16=1 остаток 12=C
1/16=0 остаток 1
const
m=8;
var
arr: array[1..m] of integer;
max_num: integer;
i: integer;
Summ: integer;
min_num: integer;
x: integer;
begin
randomize;
Summ:=0;
x:=random(20,70);
for i := 1 to x do begin
arr[i] := random(10);
Summ+=arr[i];
writeln (arr[i]);//вывод элементов на экран
end;
max_num := arr[1];
for i := 2 to m do
if arr[i] > max_num then begin
max_num := arr[i];
end;
min_num := arr[1];
for i := 2 to m do
if arr[i] < min_num then begin
min_num := arr[i];
end;
writeln('Summ = ',summ);//Сумма
writeln ('Max = ',max_num);//Максимальный
writeln('Min = ', min_num);//минимальный элемент
writeln('Сount_of_elements = ',x);//количество элементов
end.
Объяснение:
вроде в коде подписано что нужно