Напишите программу в pascal, которая проверяет делимость введенного числа с клавиатуры на 2,3,4,5

Var a: integer;   flag: boolean; begin   flag: =false;   write('введите число ');   readln(a);   if a mod 2 = 0 then  begin       writeln('число ',a,' делится на 2');       flag: =true;   end;   if a mod 3 = 0 then begin       writeln('число ',a,' делится на 3');       flag: =true;   end;   if a mod 4 = 0 then  begin       writeln('число ',a,' делится на 4');       flag: =true;   end;   if a mod 5 = 0 then  begin       writeln('число ',a,' делится на 5');       flag: =true;   end;   if not flag then writeln('число ',a,' не делится на 2,3,4,5'); end.

35 - 10 = 25 чисел нужно для записи результата

2^ i = 25

i = 5

для кодирования 25 чисел нужно 5 бит

27 * 5 = 135 бит

ответ. 135 бит.

 

тогда наверное будет:

2^i = 35

i = 6 бит

27 * 6 = 162 бит

ответ. d) 162 бит

но это не верно. т.к. мы кодируем 25 числе, а не 35. возможно в ответах опечатка