Сколько единиц в двоичной записи числа 234?

компьютер телфон и иже с ними

var alpha: real;

begin

  read(alpha);

  if alpha > 90 then write("tupougolnyj");

  if alpha = 90 then write("prjamougolnyj");

  if alpha < 90 then write("ostrougolnyj");

end.