Преобразование неотрицательных целых чисел из десятичной системы счисления в двоичную

@Элвин · Регистрация: 15.10.2013

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

Разработать программу (TurboPascal) для преобразования неотрицательных целых чисел из десятичной системы счисления в двоичную системы счисления.

@ildwine · 04.11.2013, 18:05

Pascal

var
  a, b : integer;
  s, t : string;
begin
  s := '';  
  write('введите неотрицательное целое число: ');
  readln(a);
  while a <> 0 do
  begin
    b := a mod 2;
    str(b, t);
    s := concat(t, s);
    a := a div 2    
  end; 
  writeln(s);
  readln
end.

@Элвин 0 / 0 / 0 Регистрация: 15.10.2013 Сообщений: 9
		1
	Преобразование неотрицательных целых чисел из десятичной системы счисления в двоичную 04.11.2013, 11:08. Показов 1228. Ответов 1 Метки нет (Все метки) Разработать программу (TurboPascal) для преобразования неотрицательных целых чисел из десятичной системы счисления в двоичную системы счисления. 0

	04.11.2013, 18:05

Преобразование неотрицательных целых чисел из десятичной системы счисления в двоичную

Решение