М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
Excellent11
Excellent11
01.06.2023 15:22 •  Информатика

Впоследовательности из 15 целых чисел определить произведение(p) max и min ,сумму (s) отрицательных чисел данной последовательности

👇
Ответ:
gggnnn
gggnnn
01.06.2023

Программа на паскале:


var a,min,max,p,s,i:integer;

begin

write('a = ');

readln(a);

min:=a; max:=a;

if a<0 then s:=a else s:=0;

for i:=2 to 15 do

begin

write('a = ');

readln(a);

if a<min then min:=a;

if a>max then max:=a;

if a<0 then s:=s+a;

end;

writeln('min = ',min,' max = ',max,' p = ',min*max);

writeln('s = ',s);

end.


Пример (для 5 чисел):

a = 5

a = -4

a = 2

a = 7

a = -1

min = -4 max = 7 p = -28

s = -5

4,6(31 оценок)
Ответ:
78787877
78787877
01.06.2023
//PascalABC.NET 3.4

procedure abcd(k:integer; var smax,smin,sum:integer;
  var prod:BigInteger);
begin
  if k>smax then smax:=k;
  if k<smin then smin:=k;
  if k<0 then sum+=k;
  prod*=k
end;

begin
  var (smin,smax,sum):=(MaxInt,-MaxInt,0);
  var prod:BigInteger:=1;
  ReadSeqInteger('Введите 15 чисел->',15)
    .ForEach(p->abcd(p,smax,smin,sum,prod));
  Writeln('Min=',smin,', max=',smax,', сумма отрицательных=',sum);
  Writeln('Произведение=',prod)
end.
4,6(5 оценок)
Открыть все ответы
Ответ:
G4wer
G4wer
01.06.2023
2 бита в двоичной системе дают 4 возможных комбинации. То есть вероятность извлечения белого шара 1/4, то (исходное целое делим на количество комбинаций) . Таким образом, получаем, что всего шаров: белых - одна часть, а чёрных - три. То есть белых шаров в 3 раза меньше: 18 / 3 = 6 (штук) .
А всего шаров:
18 чёрных + 6 белых = 24

или

Пусть в корзине всего x шаров, тогда среди них x-18 белых.

Вероятность того, что из корзины будет вынут белый шар равна P=(x-18)/x
Количество собственной информации равно I=log2(1/P)=log2(1/(x-18)/x))=log2(x/(x-18))

Отсюда
log2(x/(x-18))=2
x/(x-18)=2^2
x=4x-72
x=24 шара
4,4(13 оценок)
Ответ:
gdaniiiurik123
gdaniiiurik123
01.06.2023

З метою зберігання, передавання, опрацювання, захисту повідомлень часто змінюють б їх подання.

Усні повідомлення записують на папері, замінюючи звуки людської мови літерами алфавіту. При цьому виконується збереження повідомлень. Під час розмови по телефону звуки перетворюються на електричні сигнали. Це робить можливим передавання повідомлень на великі відстані. Розв’язуючи задачу на уроці математики, слова, що позначають числа, записують цифрами, а математичні операції – спеціальними знаками. Це спрощує виконання операцій з опрацювання повідомлень. Для захисту змісту повідомлень від сторонніх осіб проводять шифрування, замінюючи літери в тексті повідомлення іншими літерами, числами або умовними позначеннями.

Код (лат. codex – книга) – система умовних знаків, сигналів для передавання, опрацювання та збереження повідомлень.

 

Кодування повідомлень — це процес перетворення за певними правилами одного подання набору даних в інший. Під час кодування повідомлення відбувається зміна вигляду повідомлення без зміни його змісту.

Кодування – це перетворення повідомлень у зручну для передавання, зберігання опрацювання форму.

Декодування – це перетворення закодованого повідомлення у форму, прийнятну для приймача.

Объяснение:

4,6(96 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
Полный доступ к MOGZ
Живи умнее Безлимитный доступ к MOGZ Оформи подписку
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ