10 класс количество информации задание 11.mtf - My TestStudent х
Файл Тест Настройка
Настройка Справка
3
Вопрос # 5 из 5:
При регистрации в компьютерной системе каждому пользователю выдаётся пароль, состоящий из 11 символов и
содержащий только символы и, К, Л, М, Н. Каждый такой пароль в компьютерной программе записывается
минимально возможным и одинаковым целым количеством байт (при этом используют пoсимвольное кодирование и
все символы кодируются одинаковым и минимально возможным количеством биг). Определите объём памяти,
отводимый этой программой для записи 60 паролей. (ответ дайте в байтах.)
​

Const 
n=5;

Var
 ar:array[1..n] of integer;
 ar2:array[1..n] of integer;
 i,k:integer;

 function prost(a:integer):boolean;
 var i:integer;
 b:boolean;
  begin
  b:=true;
   for i:=2 to a div 2 do
    if a mod i=0 then
     begin;
      b:=false;
      break;
     end;
   if a=1 then b:=false;
  prost:=b;
 end;

  begin;
 randomize;
 k:=0;
  for i:=1 to n do
   begin;
    ar[i]:=random(101);
    write(ar[i]:4);
   end;
  writeln;
  for i:=1 to n do
  if prost(ar[i]) then
   begin;
    inc(k);
    ar2[k]:=ar[i];
    write(ar2[k]:4);
   end;
end.

# (a,b,c)= [int(x) for x in input().split()]

bin_num="1101011"

dec_num=int(bin_num,2)

test1=[10,34,65]

test2=[76,18,55]

test3=[81,75,20]

print(dec_num)

for x in test1:

   if(x>dec_num):

       print(x," больше, чем ", dec_num)

   else:

       print(dec_num," больше, чем ", x)

for x in test2:

   if(x>dec_num):

       print(x," больше, чем ", dec_num)

   else:

       print(dec_num," больше, чем ", x)

for x in test3:

   if(x>dec_num):

       print(x," больше, чем ", dec_num)

   else:

       print(dec_num," больше, чем ", x)