Увеличить каждый элемент массива на 1 и вывести на экран - Pascal ABC

Узнай цену своей работы

Формулировка задачи:

Заполнить массив из 10 элементов случайными числами из интервала от -10 до 10, вывести на экран, затем увеличить каждый элемент массива на 1 и повторно вывести на экран.

Решение задачи: «Увеличить каждый элемент массива на 1 и вывести на экран»

textual
Листинг программы
randomize;
for i:=1 to 10 do
 begin
  a[i]:=-10+random(21);
  write(a[i]:4);
 end;
writeln;
for i:=1 to 10 do
 begin
  a[i]:=a[i]+1;
  write(a[i]:4);
 end;

Объяснение кода листинга программы

  1. Строка randomize; используется для инициализации генератора случайных чисел.
  2. В цикле for i:=1 to 10 do мы используем переменную i для перебора чисел от 1 до 10.
  3. В каждой итерации цикла мы используем переменную a[i] для обращения к элементу массива с индексом i.
  4. Значение a[i] устанавливается равным -10+random(21), что генерирует случайное число от -10 до 20.
  5. Затем мы выводим значение a[i] с помощью функции write(a[i]:4), где :4 указывает, что число должно быть записано в формате с четырьмя знаками после запятой.
  6. После этого мы используем цикл for i:=1 to 10 do снова, на этот раз для изменения значения каждого элемента массива.
  7. В каждой итерации мы используем оператор a[i]:=a[i]+1, чтобы увеличить значение элемента массива на 1.
  8. Затем мы используем функцию write(a[i]:4), чтобы вывести обновленное значение элемента массива.
  9. Цикл for i:=1 to 10 do выполняется 10 раз, перебирая числа от 1 до 10.
  10. Вывод на экран завершается строкой writeln;.

Оцени полезность:

5   голосов , оценка 4 из 5
Похожие ответы