Пожалуйста, помогите написать программу.

Question

Задание такое: написать программу с процедурой перевода положительного десятичного числа в двоичное. Пожалуйста, помогите чем сможете, спасибо всем!

Василий · Accepted Answer

Наслаждайтесь: 
 
long long num = 938409238409283409; 
int n = log(num)/log(2)+1; 
NSString *result = @""; 
for (int j=n; j>=0; j--) 
{ 
 long long curPOW = powl(2,j); 
 if (curPOW <= num) 
 { 
 num -= curPOW; 
 result = [result stringByAppendingString:@"1"]; 
 } 
 else result = [result stringByAppendingString:@"0"]; 
} 
NSLog(@"%@", result);

Ольга · Answer

ты б хоть язык указал

Алексей Новиков · Answer

Без проверки на допустимость, но для почти любого числа (в разумных пределах ;-) 
 
function DecToBin(N : String) : String; 
var D : Byte; P : Word; 
begin 
 Result := ''; 
 repeat 
 D := 0; 
 for P := 1 to Length(N) do 
 begin 
 D := D * 10 + Ord(N[P]) - 48; 
 N[P] := Chr(D div 2 + 48); 
 D := D mod 2; 
 end; 
 while (Length(N) > 1) and (N[1] = '0') do 
 Delete(N, 1, 1); 
 Result := Chr(D + 48) + Result; 
 until (Length(N) = 1) and (N[1] = '0'); 
end;