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

Question

Информатика

Александрен

19 сентября, 03:09

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

+4

Ответы (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.