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

1001001 2-ую в 10-ую 62 10-ую в 2-ую 115 10-ую в 2-ую 32 8-ую в 10-ую 9da 16-ую в 10ую с решением

👇
Ответ:
witerold
witerold
02.05.2023
К последнему пояснение : при переводе букв из 16тиричной в 10ичную за D считается 13 , а за A - 10 .
1001001 2-ую в 10-ую 62 10-ую в 2-ую 115 10-ую в 2-ую 32 8-ую в 10-ую 9da 16-ую в 10ую с решением
4,5(13 оценок)
Открыть все ответы
Ответ:
05Дарья50
05Дарья50
02.05.2023

Объяснение:

19. 0. Или пустое множество.

A = {1, 2, 3, 4, 5, 6, 7, 8}; B = {1, 2, 3, 4, 5, 6, 9}; C = {1, 2, 3, 4, 5, 6}

Элементы, которые принадлежат хотя бы одному из множеств А или В:

{1, 2, 3, 4, 5, 6}

Получилось как раз множество С, и на 2 шаге все элементы удаляются.

20. Это более сложная задача, сходу не скажешь.

21. Счастливые билеты в промежутке (186780, 207701)

187781, 188881, 189981, 190091, ..., 199991,

200002, 201102, 202202, 203302, 204402, 205502, 206602.

Под многоточием стоят все симметричные номера, у которых две средних цифры меняются от 00 до 99. Всего 10 номеров.

Итого получается 3 + 10 + 7 = 20 счастливых билетов.

4,6(49 оценок)
Ответ:
islamghj
islamghj
02.05.2023
Uses crt;
const
    nmax = 20;

var
    A: array[1..nmax] of integer;
    I, m, s: integer;
    Am, kon: text;

begin
    Clrscr;
    Assign(Am, 'Am.txt');
    
    {раскоментировать для записи массива в файл}
    {Rewrite(Am);
    m := Random(nmax - 5) + 5;
    for i := 1 to m do
        Writeln(Am, Random(20));
    Close(Am);}
    
    {считывание данных из файла}
    Reset(Am);
    s := 0;
    m := 0;
    while not eof(Am) do
    begin
        m := m + 1;
        Readln(Am, A[m]);
        s := s + A[m];
    end;
    Close(Am);
    
    Assign(kon, 'kon.txt');
    Rewrite(kon);
    
    if s > 50 then
        Writeln('Сумма элементов массива более 50 и равна: s=', s)
    Else
    begin
        Writeln('Сумма элементов менее 50, вывод исходного массива');
        for i := 1 to m do
        begin
            Writeln('A[', i, ']=', A[i], ' ');
            Writeln(kon, 'A[', i, ']=', A[i], ' ');
        end;
    end;
    
    Close(kon);
    Readkey;
end.
4,4(55 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
Полный доступ к MOGZ
Живи умнее Безлимитный доступ к MOGZ Оформи подписку
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ