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

Спиннер – модная игрушка c подшипником в основании, к которому прикреплены лопасти. Афанасий открыл бизнес по производству спиннеров. Он выяснил, что за спиннер,у которого N лопастей, покупатели готовы платить A + B × N рублей, но при этом покупатель не станет покупать спиннер, если его цена будет выше C рублей. Определите максимальное число лопастей спиннера, который согласится приобрести покупатель.Программа получает на вход три числа A, B, C (стоимость основания спиннера,стоимость одной лопасти и максимальная стоимость всего спиннера). Все числа – целые положительные, не превосходящие 20000000000 , при этом A ≤ C.Программа должна вывести одно число – максимальное число лопастей спиннера.

👇
Ответ:
Асия22222
Асия22222
09.03.2023

{Целевой язык не указан, приведу пример на Haskell}

Цена вычисляется как Price = A + B \times N

C - максимальная цена, которую мы можем себе позволить.

Поэтому N = \max \Leftrightarrow N = (C - A) div B, где div - оператор целочисленного деления.

Кодmodule Spinner (spinner, maybeTo) whereimport Control.Monad.Fail as MFail (MonadFail, fail) import System.IO (hFlush, stdout)import Text.Read (readMaybe)import Data.Maybe (maybe)maybeTo :: (MonadFail m) => Maybe b -> String -> m bmaybeTo Nothing msg = MFail.fail msgmaybeTo (Just a) _ = return aspinner :: IO ()spinner = do    putStr "Enter an A: "    hFlush stdout    maybeA <- fmap readMaybe getLine :: IO (Maybe Int)    a <- maybeTo maybeA "It's not an Int"    putStr "Enter an B: "    hFlush stdout    maybeB <- fmap readMaybe getLine :: IO (Maybe Int)    b <- maybeTo maybeB "It's not an Int"    putStr "Enter an C: "    hFlush stdout    maybeC <- fmap readMaybe getLine :: IO (Maybe Int)    c <- maybeTo maybeC "It's not an Int"    maybe (putStrLn "You can't use 0 with B var!")            (putStrLn . ("The maximum spinner's levers number is  " ++) . show)            (makeNumber a b c)    putStrLn ""makeNumber :: Int -> Int -> Int -> Maybe Int    makeNumber _ 0 _ = NothingmakeNumber a b c = Just $ div (c - a) b
Спиннер – модная игрушка c подшипником в основании, к которому прикреплены лопасти. Афанасий открыл
Спиннер – модная игрушка c подшипником в основании, к которому прикреплены лопасти. Афанасий открыл
Спиннер – модная игрушка c подшипником в основании, к которому прикреплены лопасти. Афанасий открыл
4,5(92 оценок)
Открыть все ответы
Ответ:
MrZick33446
MrZick33446
09.03.2023
1. Сидеть не ближе 50см и не дальше 1.5м от монитора
2. Сохранять правильное положение рук на мыши и клавиатуре, при этом желательно использовать эргономические клавиатуры (Natural или Anti-RSI) и коврики со специальной подставкой для руки
3. Не пользоваться ЭЛТ-мониторами, только ЖК\IPS
4. По одному пользователю на компьютер (т.е. вдвоём за одним компьютером не сидеть)
5. Запускать программы только из белого списка разрешённых программ; впрочем, в этот список можно добавить проигрыватель виртуальных машин и запускать в нём что угодно.
6. Не кривляться на стуле, ага
4,7(58 оценок)
Ответ:
Сарфароз03
Сарфароз03
09.03.2023
1. Сидеть не ближе 50см и не дальше 1.5м от монитора
2. Сохранять правильное положение рук на мыши и клавиатуре, при этом желательно использовать эргономические клавиатуры (Natural или Anti-RSI) и коврики со специальной подставкой для руки
3. Не пользоваться ЭЛТ-мониторами, только ЖК\IPS
4. По одному пользователю на компьютер (т.е. вдвоём за одним компьютером не сидеть)
5. Запускать программы только из белого списка разрешённых программ; впрочем, в этот список можно добавить проигрыватель виртуальных машин и запускать в нём что угодно.
6. Не кривляться на стуле, ага
4,7(17 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ