Ира , боря и алёша закодировали по одному слову. вот их коды ; 1011 1111 1011 1110 1011 1011 1011 0101 второе слово 1011 1110 1011 0111 1011 0101 третье слово 1011 1011 1011 0101 1100 0001

Bfbebbb5 beb7b5 bbb6c1 вот что получается по шестнадцатиричной системе счисления а дальше сам додумывай! )

Анаписано какие буквы?

Program xxx; var n, s, k, c : integer; sa : real; begin write ('введите число n-'); readln (n); k: =0; s: =0; while n> 0 do begin c: = n mod 10; s: =s+c; k: =k+1; n: =n div 10 end; write ('сумма цифр = ', s); write ('количество цифр =', k); sa: =s/k; write ('среднее арифметическое =', sa) end.

12 var 3 s : string; 4 begin 5 readln (s ); 6 while pos ( 'с' ,s )> 0 do delete (s ,pos ( 'с' ,s ) ,1 ); 7 writeln (s ); 8 end. не уверена,но по-моему так