Заранее, ! определите в списке те позиции, которые не являются правильными записями чисел в указанных системах счисления. а) 00111200 в двоичной системе счисления б) а916 в шестнадцатеричной системе счисления в) 23410 в десятеричной системе счисления г)104525 в пятеричной системе счисления

var a: integer;

begin

writeln ('vvedite nomer mesuaca');

read (a);

if (a=1) then writeln ('30');

if (a=2) then writeln ('28');

if (a=3) then writeln ('30');  

  if (a=4) then writeln ('31');  

  if (a=5) then writeln ('30');  

  if (a=6) then writeln ('31');  

  if (a=7) then writeln ('30');  

  if (a=8) then writeln ('31');  

  if (a=9) then writeln ('30');  

  if (a=10) then writeln ('31');  

  if (a=11) then writeln ('30');  

  if (a=12) then writeln ('31');  

end. 

бег - бог - бок - бак - мак - маг -шаг