Описать функцию, которая возвращает строковое представление целого числа N в двоичной системе счисления

@Oxanin · Регистрация: 21.03.2013

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

Описать функцию, которая возвращает строковое представление целого числа N в двоичной системе счисления. Используя эту функцию , получить двоичные представления пяти чисел.

@APALoff · 18.12.2013, 10:39

Pascal

Function GetBinNum(A : Longint) : String;
Var
  S : String;
  n : Longint;
Begin
  S:=''; n:=A;
  While n>0 do
  Begin
    S:=Chr(48+(n mod 2))+S;
    n:=n div 2;
  End;
  GetBinNum:=S;
End;
 
Begin
  Writeln(GetBinNum(4));
  Writeln(GetBinNum(6));
  Writeln(GetBinNum(16));
  Writeln(GetBinNum(32));
  Writeln(GetBinNum(64));
End.

@Oxanin 0 / 0 / 0 Регистрация: 21.03.2013 Сообщений: 19
		1
	Описать функцию, которая возвращает строковое представление целого числа N в двоичной системе счисления 17.12.2013, 22:17. Показов 3124. Ответов 1 Метки нет (Все метки) Описать функцию, которая возвращает строковое представление целого числа N в двоичной системе счисления. Используя эту функцию , получить двоичные представления пяти чисел. 0

	18.12.2013, 10:39

Опции темы

Описать функцию, которая возвращает строковое представление целого числа N в двоичной системе счисления

Решение