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

Паскаль. найти наименьшее среди положительных из 10 чисел, введенных с клавиатуры (пределы изменения не заданы)

👇
Ответ:
Мариелла17
Мариелла17
23.09.2022
Uses Crt;
const n=10;
var
A: array[1..n] of integer;
i,f,f1: integer;
begin
clrscr;
f:=-1;
f1:=-1;
for i:=1 to n do
begin
writeln('введите',i,' элемент массива ');
readln (A[i]);
if A[i]>0  then
begin
f1:=A[i];
if f<0 then
f:=A[i];
if f>f1 then
f:=A[i];
end;
end;
writeln('наименьшее положительное', f);
readln;
end.
4,5(13 оценок)
Открыть все ответы
Ответ:
G4wer
G4wer
23.09.2022
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 оценок)
Ответ:
irinkaokhotina
irinkaokhotina
23.09.2022

Давай сравним все 4 числа между собой, найдём максимальное и вычтем из него N.


Код

#include <bits/stdc++.h>

using namespace std;

int main() {

   int a, b, c, d, n;

   cin >> a >> b >> c >> d >> n;

   if (a > b && a > c && a > d)

       a -= n;

   else if (b > a && b > c && b > d)

       b -= n;

   else if (c > a && c > b && c > d)

       c -= n;

   else d -= n;

   cout << a << " " << b << " " << c << " " << d << endl;

   return 0;

}

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