Расставьте блоки программы заполнения массива случайными числами и поиска элемента, равного числу 50, в правильном порядке.

• program poisk;
  var n, i: integer;
  a: array
  \[1\.\.10\]
  of integer;
• begin
• randomize;
  for i := 1 to 10 do a
  \[i\]
  := random \(100\);
  for i := 1 to 10 do write \(a⟨1⟩, ' '\);
• n := 0;
  for i := 1 to 10 do
  if a
  \[i\]
  = 50 then n := i;
• if n = 0 then write \('Нет'\) else write \('a⟨4⟩ = ', i\)
• end.