Сообщение, сжатое с алгоритма RLE, имеет вид: 804X1106Х501X101X202X202X501X101X102X102XI02X401X10IX10 2Х102Х102X505X101Х202Х505Х104Х606Х103Х7О10Х2О16Х Восстановите первоначальный вид сообщения, если известно, что оно состоит из 10 строк, в каждой из которых содержится по 16 символов.

Du gehst mir auf die Eier!

Объяснение:

Type   mas=array[,] of integer; const   n=5;   m=6; var   i,j,ik,jk,k: integer;   a: mas;   b: array[0..n-1]of integer; // массив begin setlength(a,n,m); writeln('массив: '); for i: =0 to n-1 do   begin   for j: =0 to m-1 do     begin     a[i,j]: =random(20);     write(a[i,j]: 4);     end;   writeln;   end; writeln('вставка строк: '); // в массиве b признак наличия в строке 1-го четного for i: =0 to n-1 do     if a[i,0] mod 2=0 then  b[i]: =1; for i: =0 to n-1 do k: =k+b[i]; k: =n+k-1; setlength(a,k+1,m); ik: =k; for i: =n-1 downto 0 do   begin   if b[i]=1 then       begin       for jk: =0 to m-1 do  a[ik,jk]: =1;       ik: =ik-1;       end;   for jk: =0 to m-1 do a[ik,jk]: =a[i,jk];   ik: =ik-1;   end; for i: =0 to k do   begin   for j: =0 to m-1 do  write(a[i,j]: 4);   writeln;   end;   end.