begin Randomize; Writeln('Элементы массива, кратные трем:'); s := 0; for i := 1 to n do begin a[i] := Random(301)-150; if (a[i] mod 3)=0 then Write(a[i],' '); if a[i]>0 then s:=s+a[i] end; Writeln; Writeln('Сумма положительных элементов равна ',s) end.
next = []
for i in range(54,9185):
if i % 5 == 0:
next.append(i)
print(next)