Ответ:
000
Объяснение:
У нас будут кодовые слова для А: 011, 000, 101, но выберем мы 000, потому что он имеет наименьшее числовое значение.
Program zadacha;
var
k,x,i,n:integer;
m:Array[1..100] of Integer;
begin
k:=0;
readln(n);
for i:=1 to n do begin
readln(m[i]);
end;
for i:=2 to n do begin
if m[i]>m[1] then k:=k+1;
end;
write(k);
<span>end.</span>
X+5=13
x=13-5
x=8
8+5=13
13=13
Дай поесть и напои и скажи иди