Question

Создайте проект для вычисления среднего арифметического положи- тельных чисел, первое из которых равно 100, а каждое следующее меньше предыдущего на заданное положительное число.

Answer 1

PascalABC.NET

Ответ:

• begin
• var n := ReadInteger;
• SeqWhile(100, x->x-n, x->x>0).Average.Print
• end.

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

Answer 2

Конечно, вот пример простого проекта на Python, который вычисляет среднее арифметическое положительных чисел, начиная с 100 и уменьшая каждое следующее число на заданное положительное значение:

pythonCopy code
def calculate_average(start_number, step, num_count):
    total_sum = 0
    current_number = start_number

    for _ in range(num_count):
        total_sum += current_number
        current_number -= step

    average = total_sum / num_count
    return average

def main():
    start_number = 100
    step = float(input("Введите значение шага: "))
    num_count = int(input("Введите количество чисел: "))

    if step <= 0 or num_count <= 0:
        print("Шаг и количество чисел должны быть положительными.")
        return

    average = calculate_average(start_number, step, num_count)
    print("Среднее арифметическое:", average)

if __name__ == "__main__":
    main()

Просто скопируйте этот код в файл с расширением .py, запустите его, и программа попросит вас ввести значение шага (разницы между числами) и количество чисел для вычисления среднего арифметического. После ввода данных программа выведет среднее арифметическое значение.