Напишите, что делает этот фрагмент программы..... var a: array [1..Sz] of integer; N: integer; i: integer; begin N := 20; for i:=1 to N do a[i] := Random(100); writeln('Элементы массива: '); for i:=1 to N do write(a[i],' ');end.