Формулу:
=IF(OR(B2<>0;C2<D2);"не зачислен";"Зачислен")
необходимо записать в ячейку Е2
B2 - количество "2"
C2 - средний бал
D2 - проходной бал
Количество символов в алфавите (=количество различных символов в "ZLXUZX&$NO") = 8. Объем одного символа = log(2)8 = 3 бита. Объем ответного сообщения = (10/2)*3 = 15 бит
P.S программа работает для русских символов. Если нужны латинские, то поменяйте все "а","у" и "х" на соответствующие
program n1;
uses crt;
var
st:string;
i:integer;
begin
writeln('Введите строку'); readln(st);
for i:=1 to length(st) do
if (st[i]='а') and (st[i+1]='х') then st[i]:='у';
writeln(st);
<span>end.</span>
var
m, n, x : integer;
begin
write('введите m ');
readln(m);
write('введите n ');
readln(n);
writeln('значение функции y=x^2+8x-6 на промежутке от m до n');
for x := m to n do writeln('x=', x, ' y=', sqr(x)+8*x-6);
end.