На диск помещается информация 2,5 поместятся ли на него файл объемом 5000 байт

77

Шестнадцатеричная система - 4d.

Двоичная система - 1001101.

Посмотрите так же как пишутся десятичные цифры 81, 100, 68, 214, 459, 965, 532, 468, 9343, 398, 5286, 47209, 6277, 179062, 729691 в различных системах счисления.

Число 77 в других системах счисления:

2 - 1001101, 3 - 2212, 4 - 1031, 5 - 302, 6 - 205, 7 - 140, 8 - 115, 9 - 85, 10 - 77, 11 - 70, 12 - 65, 13 - 5c, 14 - 57, 15 - 52, 16 - 4d, 17 - 49, 18 - 45, 19 - 41, 20 - 3h, 21 - 3e, 22 - 3b, 23 - 38, 24 - 35, 25 - 32, 26 - 2p, 27 - 2n, 28 - 2l, 29 - 2j, 30 - 2h, 31 - 2f, 32 - 2d.

var a: array [1..5] of integer;

i, j , count: integer;

repeated : boolean;

begin

   for i := 1 to 5 do

   begin

       write('Введите ', i, '-e число: ');

       readln(a[i]);

   end;

   for i := 1 to 5 do

   begin

       repeated := false;

       for j := 1 to i - 1 do

           if (a[i] = a[j]) then

               repeated := true;

       if repeated then continue;

       count := 1;

       for j:= i+1 to 5 do

           if (a[i]=a[j]) then

               inc(count);

       writeln('Число ', a[i], ' встречается ', count,' раз');

   end;

end.