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

Примеры к разветляющиемся алгоритмам

👇
Ответ:
Оплата покупки в магазине, когда есть выбор оплаты - картой или наличными, если наличными то какими купюрами.
Задача подбора ноутбука по различным параметрам для покупки. Нужен такой то процессор, такая то видеокарта, но чтобы цена не превышала заданную.
Задача добраться до места назначения используя разветвленную сеть веток метро. Можно добраться разными маршрутами, нужно выбрать чтобы было меньше пересадок или меньше длинна пути чтоб была или как можно ближе к месту назначения чтобы выйти в итоге
4,5(64 оценок)
Открыть все ответы
Ответ:
katyaklimovich
katyaklimovich
05.12.2021
Var N,B,k:integer;
Begin
Write('N = ');ReadLn(N);
Write('Искомые числа:');
For N:= 1 to N do
    Begin
    B:=N;
    k:=1;
    // перед каждой проверкой k:=1
    // и если число не делится на любую из своих цифр, то k:=0
    While B > 0 do
       Begin
       if B mod 10 = 0 then k:=0
       // B mod 10 - это остаток от деления B на 10
       // то есть, например, 123 mod 10 = 3
       else if N mod (B mod 10) > 0 then k:=0;
       B:=B div 10
       // целая часть от деления B на 10
       // 123 div 10 = 12
       End;
    if k = 1 then Write(' ',N)
    End;
End.
4,8(46 оценок)
Ответ:
Vita0814
Vita0814
05.12.2021
1. Винер Норберт - изучил высшую математику, стал доктором философии Гарвардского университета , профессор Массачусетского технологического института. Получил известность как математик работами по теории потенциала, гармоническим функциям, рядам и преобразованиям Фурье, тауберовым теоремам, общему гармоническому анализу. У Винера возникла идея о необходимости создания единой науки, изучающей процессы хранения и переработки информации, управления и контроля. Для этой науки предложил название кибернетика .
2. Клод Шеннон - основатель теории информации .Приложил свои руки в инженерии, кибернетики, электротехнике, математике и теории информации. Разработал теорию связи кодирования. Создал промышленную  радиоуправляемую игрушку , ввёл понятие "бит" - единица измерения. Отмечен многими наградами и премиями,  и Нобелевской премией.
3. Тедом Нельсоном в 1965 году
4. Тим Бернерс-Ли в 1980 году
4,6(11 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ