Const n=5; Var s,i: integer; a:array[1..n] of integer; Begin a[1]:=1; a[2]:=2; a[3]:=3; a[4]:=4; a[5]:=5; s:=0; for i:=1 to n do begin s:=s+a[i]; writeln('Сумма элементов = ', s); {если тут, то вывод всех чисел на экран } end; {если сюда вставить writeln('Сумма элементов = ', s); то тебе покажут тока ответ} End.
from random import randint
a = [randint(1,10) for i in range(10)]
for i in a:
if i < 5:
print(i)