Слово "слон" если лишнее надо убрать
Var ma,kol,bol,n,x,i:integer;beginread(n);for i:=1 to n do begin read(x); if x<30 then inc(bol); if x>ma then ma:=x; end;writeln(ma);if bol>0 then writeln('YES') else writeln('NO'); end.
Алг массив
нач
цел N = 15
целтаб a[1:N]
цел i
нц для i от 1 до N
a[i] := irnd(0,100)
вывод a[i], " "
кц
вывод нс
a[2] := 0
a[14] := 0
нц для i от 1 до N
вывод a[i], " "
кц
кон
Для передачи сообщения используется набор,состоящий только из десятичных цифр(0,1,2,3,4,5,6,7,8,9). Определите минимально возмож
оксана одинцова [7]
Цифр 10 значит минимум нужно 2^4=16 комбинаций из 4 бит.
Ответ - 4 бит