Ввести число, а программа выдаст его степень

@Sergey12312 · Регистрация: 24.10.2013

Author24 — интернет-сервис помощи студентам

Ввести число, а программа выдаёт его степень.
Грубо говоря ввожу 256 - это 2 в 8 степени.

@Sergey12312 · 24.04.2014, 10:28 **[ТС]**

Поднимаю

@Puporev · 24.04.2014, 11:30

Сообщение от Sergey12312

а программа выдаст его степень.

Степень числа 2?

Добавлено через 11 минут

Pascal

var n,k:integer;
begin
write('Введите натуральное число n=');
readln(n);
k:=0;
while (n>1)and(k<>-1) do
 begin
  if n mod 2=0 then
   begin
    n:=n div 2;
    k:=k+1
   end
  else k:=-1;
 end;
if k=-1 then write('Это не степень числа 2')
else write('Степень 2=',k);
end.

@APALoff · 24.04.2014, 11:31

Pascal

1 2	Readln(a); Writeln(ln(a)/ln(2));

@Sergey12312 0 / 0 / 0 Регистрация: 24.10.2013 Сообщений: 26
		1
	Ввести число, а программа выдаст его степень 21.04.2014, 18:15. Показов 819. Ответов 3 Метки нет (Все метки) Ввести число, а программа выдаёт его степень. Грубо говоря ввожу 256 - это 2 в 8 степени. 0

@Sergey12312 0 / 0 / 0 Регистрация: 24.10.2013 Сообщений: 26
	24.04.2014, 10:28 [ТС]	2
	Поднимаю 0

	24.04.2014, 11:31