1.Задать массив М(9) случайными числами от 21 до 47.
2.Уменьшить на 3 элементы массива.
3.Увеличить на 50 элементы массива.

vara:array[1..9] of integer;i:integer;begin for i:=1 to 9 do   begin    a[i]:=random(26)+21;    write(a[i]," ");   end;writeln(); for i:=1 to 9 do  begin   a[i]:=a[i]-3;   write(a[i]," ");  end;writeln(); for i:=1 to 9 do  begin   a[i]:=a[i]+50;   write(a[i]," ");  end;end.