Замени шестнадцатеричную цифру 6 четырьмя двоичными цифрами (тетрадой).

укрытся одеялом и лечь спать,   и пить лекартва и остаться дома

а необходимо

б достаточно

в необходимо

г достаточно

д необходимо и достаточно

var h,a: integer;

begin

  a: =1;

  repeat

      h: = h+3;

      a: =2*a;

      writeln('прошло часов - ',h,', амеб - ',a)

  until h> =30;

  readln;

end.

var a: array[0..10] of integer;

i,x: integer;

begin

  read(x);

  randomize;

  for i : = 1 to 10 do begin

      a[i]: =random(4);

      if a[i]=x then writeln('a[',i,']');

  end;

end.