<h3>PascalABC.NET 3.4.2, сборка 1814 от 02.10.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>
begin
var a := ArrRandom(20, -50, 50);
a.Println;
var b := a.Sum;
Println('Сумма элементов равна', b)
end.
2^8=256. Это значит, что на запись одного автомобиля отводится 8 бит или 1 байт информации. После прохождения 90 участников, информационный объем сообщения будет равен 90 байт
import random as r #импортируем библиотеку рандом для создания рандомных чисел
N=10
#кол-во чисел которые сгенерируем
array=[r.randint(1,20) for i in range(N)]
#генерация чисел
print(*array,sep=',')
#вывод чисел через запятую
print(sum(array)/len(array))#среднее арифметическое число
простейшее уравнение:
10000/13=769
10000/17=588
10000-(588+769)=8643