Question

Даны 2 числа увеличить 10 раз меньше из них.Написать программу

Answer 1

var a, b:real;

begin
writeln('Введите 2 числа');
readln(a, b);
if a > b then
begin
b := b * 10;
writeln('Число: 'b);
end
else
begin
a := a * 10;
writeln('Число: ', a);
end;
end.

Answer 2

Для написания программы, которая увеличит число в 10 раз меньшее из двух введенных чисел, вам потребуется выбрать язык программирования. Я предоставлю пример программы на Python, но подобный функционал можно реализовать и на других языках.

Программа будет запрашивать у пользователя два числа, затем находить из них меньшее число, умножать его на 10 и выводить результат.

Вот пример программы на Python:

pythonCopy code
def main():
    # Ввод чисел с клавиатуры
    try:
        num1 = float(input("Введите первое число: "))
        num2 = float(input("Введите второе число: "))
    except ValueError:
        print("Ошибка: Введите числа корректно.")
        return

    # Находим меньшее число
    min_num = min(num1, num2)

    # Умножаем меньшее число на 10
    result = min_num * 10

    # Выводим результат
    print(f"Меньшее число {min_num} увеличено в 10 раз: {result}")


if __name__ == "__main__":
    main()

Пример использования программы:

Copy code
Введите первое число: 8
Введите второе число: 25
Меньшее число 8.0 увеличено в 10 раз: 80.0

Помните, что вы всегда можете изменить язык программирования или подходящие инструкции в зависимости от ваших потребностей.