
Ввести два числа. Если их произведение отрицательно, умножить его на (-5) и вывести на экран, в
противном случае увеличить его в 4 раза и вывести на экран

Ответы на вопрос

Язык указан не был, приведу пример на Haskell
- toInts :: [String] -> [Int]
- toInts = fmap read
- modify :: Int -> Int
- modify x | x < 0 = x * (-5)
- | otherwise = x * 4
- main :: IO ()
- main= do
- putStrLn "Enter numbers separated by newlines:"
- x <- toInts <$> mapM (const getLine) [1..2]
- putStrLn $ "Answer is " ++ show (modify $ product x)
Переменная x получат список из 2 чисел, введенных со стандартного ввода. Затем находится произведение этих чисел и прогоняется через функцию modify. Эта функция принимает на вход число и, если оно отрицательное, домножает его на -5, иначе домножает на 4, результат возвращает. Затем отображаем полученный результат в консоли.




Для решения данной задачи нам необходимо ввести два числа и проверить их произведение на отрицательность.
Для начала, объявим две переменные a и b и считаем их значения с помощью функции input():
a = int(input("Введите первое число: ")) b = int(input("Введите второе число: "))
Затем, проверим произведение чисел на отрицательность. Если оно отрицательное, умножим его на -5, иначе увеличим в 4 раза:
if (a * b) < 0: result = (a * b) * (-5) else: result = (a * b) * 4
Наконец, выведем результат на экран с помощью функции print():
print("Результат: {}".format(result))
Таким образом, мы вводим два числа, проверяем их произведение и в зависимости от результата умножаем на -5 или увеличиваем в 4 раза. Результат выводим на экран.


Похожие вопросы
Топ вопросов за вчера в категории Информатика







Последние заданные вопросы в категории Информатика
-
Математика
-
Литература
-
Алгебра
-
Русский язык
-
Геометрия
-
Английский язык
-
Химия
-
Физика
-
Биология
-
Другие предметы
-
История
-
Обществознание
-
Окружающий мир
-
География
-
Українська мова
-
Информатика
-
Українська література
-
Қазақ тiлi
-
Экономика
-
Музыка
-
Право
-
Беларуская мова
-
Французский язык
-
Немецкий язык
-
МХК
-
ОБЖ
-
Психология
-
Физкультура и спорт
-
Астрономия
-
Кыргыз тили
-
Оʻzbek tili