Для каких из указанных значений числа X истинно высказывание: НЕ (число <10) ИЛИ НЕ (число чётное)
?
7
8
9
10
11

👇

Увидеть ответ

Ответ:

samsungtaba32

10.01.2023

7 9 10 11

Объяснение:

НЕ (число < 10) ИЛИ НЕ (число чётное)

⇒ (число ≥ 10) ИЛИ (число нечетное)

7 8 9 10 11

Если между выражениями стоит значение ИЛИ, то это значит, что может выполняться либо одно, либо другое. Если выполняется либо одно, либо другое, то истинно все выражение.

Возьмём сразу все нечетные числа, т. к. выражение с ними будет истинно.

7 9 11

Остались: 8 10

Осталось найти числа, которые не попали в нечетные и ≥ 10

Сюда попадает только 10

⇒ высказывание будет истинно при значениях: 7 9 10 11

4,6(39 оценок)

Открыть все ответы

Ответ:

Anton2657

10.01.2023

Для определенности назову сами символы как-нибудь:

A (0.084), B (0.168), C (0.336), D (0.0336), E (0.3784)

Алгоритм Хаффмана:

- упорядочиваем символы по возрастанию

- сливаем вместе два символа с наименьшими вероятностями, получаем составной символ с вероятностью, равной сумме вероятностей

- повторяем, пока не останется один символ

По сути это строит дерево Хаффмана, но мне рисовать весь процесс не хочется, буду писать в строчку:

D (0.0336), A (0.084), B (0.168), C (0.336), E (0.3784) - сливаем D и A, получается (D, A) с вероятностью 0.0336 + 0.084 = 0.1176

(D, A) (0.1176), B (0.168), C (0.336), E (0.3784) - сливаем (D, A) и B, получается ((D, A), B) с вероятностью 0.1176 + 0.168 = 0.2856

((D, A), B) (0.2856), C (0.336), E (0.3784) - сливаем ((D, A), B) и C, получается (((D, A), B), C) с вероятностью 0.2856 + 0.336 = 0.6216

E (0.3784), (((D, A), B), C) (0.6216) - сливаем в (E, (((D, A), B), C)), для проверки: вероятность 0.3784 + 0.6216 = 1

(E, (((D, A), B), C)) (1)

Готово! Если хочется перерисовать в виде бинарного дерева, у родителя (x, y) потомки x и у, мой вариант (для компактности он изображен немного искаженно) во вложении.

Осталось получить коды символов. Корню присваиваем пустой код, для левого потомка приписываем к коду родителя 0, для правого 1.

Получаем коды: A = 1001, B = 101, C = 11, D = 1000, E = 0.

Эффективность кодирования - это ожидаемая длина кода. Она в данном случае равна

0,084 * 4 + 0,168 * 3 + 0,336 * 2 + 0,0336 * 4 + 0,3784 * 1 = 2,0248 бит

Для сравнения, по формуле Шеннона количество информации в битах на один символ

$\sum p_i\log_2\dfrac1{p_i}\approx1.79$

Дана последовательность для алгоритма Лемпела- Зива: 10010110 Даны числа: 0,084 ; 0,168 ; 0,336 ; 0,

4,5(47 оценок)

Ответ:

badangel888

10.01.2023

// PascalABC.NET 3.0, сборка 1088
const
nDay:array[1..12] of integer=(31,28,31,30,31,30,31,31,30,31,30,31);
type
Date=record
    Day,Month,Year:integer
end;

function DOW(Dat:Date):integer;
// день недели по дате. 0-Вс. 1-Пн, 7-Сб
var
a,y,m:integer;
begin
With Dat do begin
    a:=(14 - month) div 12;
    y:=Year-a;
    m:=month+12*a-2;
    DOW:=(7000+(day+y+y div 4-y div 100+y div 400+(31*m) div 12)) mod 7
    end
end;

procedure DMY2Date(d,m,y:integer; var data:Date);
// Преобразует к дате заданные день, месяц и год
begin
data.Day:=d; data.Month:=m; data.Year:=y
end;

procedure LastDays(month,year:integer; var Wd,Fr:Date);
// даты последней среды (Wd) и пятницы (Fr) для месяца в году }
var
LastDay:Date;
n:integer;
begin
n:=nDay[month];
if (month=2) and (year mod 4 = 0) then Inc(n);
DMY2Date(n,month,year,LastDay);
n:=DOW(LastDay); // номер последнего дня недели
Wd.Month:=month; Wd.Year:=year;
if n<3 then Wd.Day:=LastDay.Day-(n+4)
else
    if n=3 then Wd.Day:=LastDay.Day
    else Wd.Day:=LastDay.Day+3-n;
Fr.Month:=month; Fr.Year:=year;
if n<5 then Fr.Day:=LastDay.Day-(n+2)
else
    if n=3 then Fr.Day:=LastDay.Day
    else Fr.Day:=LastDay.Day-1
end;

var
Wd,Fr:Date;
ff,mf:Text;
m:integer;
begin
Assign(ff,'father.txt'); Rewrite(ff);
Assign(mf,'mother.txt'); Rewrite(mf);
// Сентябрь-декабрь 2015 года
for m:=9 to 12 do begin
    LastDays(m,2015,Wd,Fr);
    if Odd(Wd.Day) then Writeln(mf,Wd.Day,'.',m,'.2015 - 1 класс')
    else Writeln(ff,Wd.Day,'.',m,'.2015 - 1 класс');
    if Odd(Fr.Day) then Writeln(mf,Fr.Day,'.',m,'.2015 - 5 класс')
    else Writeln(ff,Fr.Day,'.',m,'.2015 - 5 класс')
end;
// Январь - май 2016 года
for m:=1 to 5 do begin
    LastDays(m,2016,Wd,Fr);
    if Odd(Wd.Day) then Writeln(mf,Wd.Day,'.',m,'.2016 - 1 класс')
    else Writeln(ff,Wd.Day,'.',m,'.2016 - 1 класс');
    if Odd(Fr.Day) then Writeln(mf,Fr.Day,'.',m,'.2016 - 5 класс')
    else Writeln(ff,Fr.Day,'.',m,'.2016 - 5 класс')
end;
Close(ff); Close(mf)
end.

Содержимое выходных файлов:
father.txt
30.9.2015 - 1 класс
28.10.2015 - 1 класс
30.10.2015 - 5 класс
30.12.2015 - 1 класс
24.2.2016 - 1 класс
26.2.2016 - 5 класс
30.3.2016 - 1 класс

mother.txt
25.9.2015 - 5 класс
25.11.2015 - 1 класс
27.11.2015 - 5 класс
25.12.2015 - 5 класс
27.1.2016 - 1 класс
29.1.2016 - 5 класс
25.3.2016 - 5 класс
27.4.2016 - 1 класс
29.4.2016 - 5 класс
25.5.2016 - 1 класс
27.5.2016 - 5 класс

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

Это интересно:

29.03.2023

Как освободиться от чувства вины...

Финансы-и-бизнес

16.12.2022

10 шагов к успеху: как стать торговцем на фермерском рынке...

Стиль-и-уход-за-собой

26.04.2022

Как укладывать волнистые волосы: советы и лайфхаки...

Компьютеры-и-электроника

23.11.2022