Программа паскал для перевод числа из десятичной системы в другую

Question

Информатика

Дил

2 октября, 12:58

Программа паскал для перевод числа из десятичной системы в другую

+3

Ответы (1)

Знаете ответ на вопрос?

Нушираван · Answer 1

var M:array [1 ... 20] of integer;

n, Ch, Ost : integer;

Begin

ReadLn (n) ;

while n > = 2 do

begin

Ch : = n div 2;

Ost : = n mod 2;

M[] : = Ost;

end;

WriteLn (M[]) ;

end.