Программа переводит Вашу фамилию и имя в код ASCII. Переведите эти коды из десятичного в двоичное представле

@july1997 · Регистрация: 12.09.2016

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

Программа переводит Вашу фамилию и имя в код ASCII. Переведите эти коды из десятичного в двоичное представление.

@Joy · 16.09.2016, 07:55

Pascal

var
  s,t:string;
  c,i,n:byte;
begin
  write('Enter you name:');
  readln(s);
  for i:=1 to length(s) do begin
    n:=ord(s[i]);
    write(s[i],' ',n:4,' ');
    t:='';
    while n>0 do begin
      t:=chr(n mod 2+48)+t;
      n:=n div 2;
    end;
    writeln(t);
  end;
end.

@volvo · 16.09.2016, 10:58

Pascal

uses strutils;
// ...
 
  for i:=1 to length(s) do begin
    n:=ord(s[i]);
    writeln(s[i],' ',n:4,' ',dec2numb(n,1,2));
  end;
// ...

Устроили из раздела филиал Турбо-Паскаля...

@july1997 0 / 0 / 0 Регистрация: 12.09.2016 Сообщений: 46
		1
	Программа переводит Вашу фамилию и имя в код ASCII. Переведите эти коды из десятичного в двоичное представле 15.09.2016, 20:24. Показов 6139. Ответов 2 Метки нет (Все метки) Программа переводит Вашу фамилию и имя в код ASCII. Переведите эти коды из десятичного в двоичное представление. 0

	16.09.2016, 10:58

Программа переводит Вашу фамилию и имя в код ASCII. Переведите эти коды из десятичного в двоичное представле

Решение