ИНОФОРМАТИКА 9 КЛАСС ПАСКАЛЬ СРОНО 1. Сформировать массив из 12 целых

ИНОФОРМАТИКА 9 КЛАСС ПАСКАЛЬ СРОНО

1. Сформировать массив из 12 целых случайных чисел от -23 до 42. Элементы, меньшие 10, поменять на их индекс.
2. Сформировать массив из 21 целых случайных чисел от -42 до 56. Элементы, имеющие нечетные индексы, увеличить на 5.

Задать свой вопрос
1 ответ
// PascalABC.NET 3.3, сборка 1627 от 27.01.2018
// Внимание! Если программка не работает, обновите версию!

1

begin
  var a:=ArrRandom(12,-23,42); a.Println;
  for var i:=0 to a.Length-1 do
    if a[i]lt;10 then a[i]:=i+1;
  a.Println
end.

Пример
26 25 -11 -11 6 32 -18 18 -9 28 1 -23
26 25 3 4 5 32 7 18 9 28 11 12

2

begin
  var a:=ArrRandom(21,-42,56); a.Println;
  foreach var i in Range(0,20,2) do a[i]+=5;
  a.Println
end.

Пример
21 3 31 -11 17 47 41 22 9 31 -33 -37 -37 43 1 34 -35 -14 -28 56 -13
26 3 36 -11 22 47 46 22 14 31 -28 -37 -32 43 6 34 -30 -14 -23 56 -8
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт