Question

Составить программу, вычисляющую произведение 3-х случайных чисел в диапазоне до 10​

Answer 1

PascalABC.NET 3.4.2, сборка 1979 (16.02.2019)

1. begin
2.  var resultNumber := SeqRandomInteger(3, 1, 10).ToArray.Println.Product.Print;
3. end.

Pascal

1. var
2.  resultNumber, randomNumber, i: integer;
3. begin
4.  resultNumber := 1;
5.  randomNumber := 1;
6.  for i := 1 to 3 do
7.  begin
8.    randomNumber := Random(11);
9.    while randomNumber = 0 do  
10.      begin
11.        randomNumber := Random(11);
12.      end;
13.    Writeln(randomNumber);
14.    resultNumber := resultNumber * randomNumber;
15.  end;
16.  Writeln('Результат: ', resultNumber);
17. end.

Answer 2

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

Вот программа на Python:

pythonCopy code
import random

def generate_random_number():
    return random.randint(1, 10)

def main():
    num1 = generate_random_number()
    num2 = generate_random_number()
    num3 = generate_random_number()

    product = num1 * num2 * num3

    print(f"Первое случайное число: {num1}")
    print(f"Второе случайное число: {num2}")
    print(f"Третье случайное число: {num3}")
    print(f"Произведение трех случайных чисел: {product}")

if __name__ == "__main__":
    main()

Как только вы запустите эту программу, она сгенерирует три случайных числа в диапазоне от 1 до 10, выведет их на экран и затем вычислит и выведет их произведение.