While5. дано целое число n больше 0 , являющееся - вопрос №50393223 от Ботаник1111111111 28.05.2021 16:51

Question

Информатика: While5. дано целое число n больше 0 , являющееся некоторой степенью числа 2: n = 2k. найти целое число k — показатель этой степени. решить с pascal

Ботаник1111111111 · Answer

function F(N: integer): integer; begin  if N = 1 then Result := 0  else Result := 1 + F(N div 2); end; begin  var N := ReadInteger();  Write(F(N)) end....