Заполните массив 10-юслучайными числами в интервале [-7,15] и подсчитать число максимальных элементов массива.Паскаль.

147

476

Посмотреть ответы 2

Ответы на вопрос:

xxxtentacionxxx1

Информатика

4,7(100 оценок)

// PascalABC.NET

begin

var a := ArrRandom(10, -7, 15);

var max := a.Println.Max;

a.Count(p -> p = max).Print

end.

Poligrinka

Информатика

4,4(43 оценок)

Пусть красных шаров x, тогда желтых шаров 16-x, а вероятность того, что будет вынут желтый шар равна p=(16-x)/16 количество собственной информации в сообщении о том, что достали желтый шар i=log2(1/p)=log2(1/((16-x)/16))=log2(16/(16-x)) = 3 бита отсюда 2^3=16/(16-x) 8*(16-x)=16 8x=112 x=14 ответ: в корзине 14 красных шаров