Question

Составить программу, которая выводит на экран кубы всех чисел, кратных 9 из диапазона [a,b] (где a,b<100). Переменные a и b запрашиваются с клавиатуры.

Answer 1

PascalABC.NET ₃.₆.₃.₂₅₇₇

Ответ:

• ##  
• var (a,b) := ReadInteger2('Введите a, b:');
• (a..b).Where(x -> x mod 9 = 0).Select(x -> x**3).Print

Пример работы:

$18^3=5832$       $27^3=19683$

Answer 2

Для создания программы, которая выводит кубы всех чисел, кратных 9, из заданного диапазона [a, b], мы можем использовать Python. Ниже представлена программа для выполнения этой задачи:

pythonCopy code
# Запрос пользователю ввода a и b
a = int(input("Введите начальное значение a (меньше 100): "))
b = int(input("Введите конечное значение b (меньше 100): "))

# Проверка, что введенные значения находятся в допустимом диапазоне
if a >= 100 or b >= 100 or a > b:
    print("Пожалуйста, введите корректные значения a и b, оба должны быть меньше 100 и a должно быть меньше или равно b.")
else:
    # Перебор чисел от a до b и вывод кубов чисел, кратных 9
    for num in range(a, b + 1):
        if num % 9 == 0:
            cube = num ** 3
            print(f"Куб числа {num} равен {cube}")

Эта программа запрашивает у пользователя значения a и b, а затем перебирает числа в заданном диапазоне, выводя кубы тех, которые кратны 9. Важно следить за тем, чтобы введенные значения a и b находились в пределах от 0 до 99 и чтобы a было меньше или равно b.