составьте программку, которая наполняет массив a[1..10] случайными целыми числами в спектре

Составьте программу, которая наполняет массив a[1..10] случайными целыми числами в спектре от 1 до 10, потом преобразовывает его, увеличивая все элементы с нечетными значениями в три раза, а элементы с четными значениями сменяя на 0

Задать свой вопрос
1 ответ
Begin
  var ar := arrrandom(10, 1, 10);
  ar.Println;
  for var i := 0 to 9 do
  if(ar[i] mod 2 = 0) then ar[i] := 0
  else ar[i] := ar[i] * 3;
  ar.Print;
end. 
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт