sos ! ) используя метод сжатия хаффмена закодируйте следующие слова и определите процент сжатия admin

1) program z1; uses crt; var a: integer; begin clrscr; repeat write('enter a: '); readln(a) until (a>=10000) and (a<=99999); a:=a div 10; Writeln (a); Readkey; End. 2) program z2; uses crt; var a: integer; begin clrscr; repeat write('enter a: '); readln(a) until (a>=10000) and (a<=99999); a:=a mod 1000; Writeln (a); Readkey; End. 3) program z3; uses crt; var a, b: integer; begin clrscr; repeat write('enter a: '); readln(a) until (a>=10000) and (a<=99999); b:=a mod 10; a:=a div 100; Writeln (a, b); Readkey; End. 4) program z4; uses crt; var a: integer; begin clrscr; repeat write('enter a: '); readln(a) until (a>=10000) and (a<=99999); a:=a div 1000; Writeln (a); Readkey; End.

15+36=51

Объяснение:

сначала 9 представили  в виде 3 в степени и расположили числа в порядке убывания получили 3^70-3^55+3^40-3^4

чтоб понять что будет представь что ты с 10000{2}-1000{2} когда ты вычитаешь эти числа у тебя кол-во единиц будет разноть между этими степенями двойки то есть 1 а кол-во нулей будет степень двойки которую ты вычитаешь то есть 3 а теперь к заданию когда мы вычли из первого второе число получили 22222{15}0000...00{55} теперь к этому числу прибавим 3^40 получим 22222{15}00...00{14}100...00{40} после вычитаем 3^4 получаем 2{15} 0{14} 1 2{36} 0{4}