program random_array;
vaK: array[1..8] of integeri: integer;
begirandomize;
for i := 1 to 8 dbegiK[i] := random(21)writeln('K[', i, '] = ', K[i])end;
end.
program random_array;
va
K: array[1..8] of integer
i: integer;
begi
randomize;
for i := 1 to 8 d
begi
K[i] := random(21)
writeln('K[', i, '] = ', K[i])
end;
end.