Автоматическое устройство осуществило перекодировку сообщения из 8-битной кодировки ascii два равных - id426699520201003 от Unicorn261 03.10.2020 19:33

Question

Информатика: Автоматическое устройство осуществило перекодировку сообщения из 8-битной кодировки ascii два равных по длине информационных сообщения в 16-битной кодировке unicode.при этом информационный объём каждого нового сообщения увеличился на 8 байт.какова длина первоначального сообщения в байтах? 1)8 2)9 3)16 4)24

Unicorn261 · Accepted Answer

1. Школьное решение // PascalABC.NET 3.0, сборка 1073 const   sb= bcdfgjklmnpqrstvwxz ;   s= Computer programming is a process of computer programs creation ; var   i,n:integer;   s1,sn,t:string; begin   i:=1;   while s[i] do Inc(i);   s1:=Copy(s,1,i-1);   n:=Length(s); i:=n;   while s[i] do Dec(i);   sn:=Copy(s,i+1,n-i);   t:= ;   for i:=1 to Length(s1) do     if Pos(s1[i],sb) 0 then t:=t+s1[i];   s1:=t;   t:= ;   for i:=1 to Length(sn) do     if Pos(sn[i],sb) 0 then t:=t+sn[i];   sn:=t;   t:=...

MOGZ ответил