сумма значений элементов, удовлетворяющих условию program sum ; var s, i: integer;
a: array[1…10] of integer;
begin randomize; for i: =1 to 10 do alı]: =random(100); for i: =1 to 10 do write (ali), 1): s: =0;
for i: =1 to 10 do if (a[i]> 10) and (a[i]< 30) then s: =s+a[i]; write('s=', s) end.
10 50 1 3 50 14 21 50 10 21
нужно составить блок схему.