import random as r #импортируем библиотеку рандом для создания рандомных чисел
N=10
#кол-во чисел которые сгенерируем
array=[r.randint(1,20) for i in range(N)]
#генерация чисел
print(*array,sep=',')
#вывод чисел через запятую
print(sum(array)/len(array))#среднее арифметическое число
Операционную систему и браузер (Интернет обозреватель).
Program task;
var i,a,b,h:longint;
begin
writeln('a?');
readln(a);
writeln('b?');
readln(b);
writeln('h?');
readln(h);
i:=a;
while (i<=b) do begin
writeln(sin(i)*sin(i));
i+=h;
end;
readln;
end.
//PascalABC.NET 3.1 сборка 1219
begin
var a := Range(30, 50).Where(x -> x mod 3 = 0).Aggregate(1, (s, x)-> s * x);
PrintLn(a);
end.