Сколько значащих нулей в двоичной записи четверичного числа 1103214?

ответ: 5

Выполним задание переводом из 4-й системы счисления в двоичную, используя правило разбиения на диады, когда каждой цифре 4-й системы соответствуют две цифры двоичной системы:

1 |  1 |  0 |  3 |  2 |  1

01 | 01 | 00 | 11 |  10|  01

Получаем двоичное число БЕЗ незначащих нулей, в котором 5 нулей: 10100111001

1) 

var

s: string;

begin

s: ='пробел';

writeln(s);

delete(s,4,1);

insert('д',s,4);

writeln(s);

end.

2)

var

i: integer;

a,b: string;

begin

readln(a);

b: ='';

for i: =1 to length(a) do

b: =b+a[i]+' ';

writeln(b);

end.

3)

var

a: string;

begin

readln(a);

if a[2]=a[4] then writeln('равны')

else  writeln('не равны');

end.

написано для pascal abc

uses graphabc; begin window.title : = 'apple'; var y,y0,x,t: integer; brush.color : = clgreen; y0: =70; x: =70; lockdrawing; for t : = 0 to 8 do begin y: =y0+5*t*t; window.clear(clwhite); circle(x,y,50); redraw; sleep(100); end; end.