
Ввести одномерный массив из 12 целых чисел с помощью генератора случайных чисел (числа в диапазоне
[-10;10] и заменить отрицательные элементы числом 1 (организовать вывод исходного и полученного в результате замены массивов).

Ответы на вопрос

const n=12;
var a:array[1..n] of integer;
i:integer;
begin
write(' Исходный массив: ');
for i:=1 to n do
begin
a[i]:=random(21)-10;
write (a[i]:3,' ')
end;
writeln;
writeln;
write('Получённый массив: ');
for i:=1 to n do
begin
if a[i]<0 then a[i]:=1;
write (a[i]:3,' ')
end
end.



Для решения задачи нужно выполнить следующие шаги: 1. Создать одномерный массив из 12 целых чисел. 2. Заполнить массив числами с помощью генератора случайных чисел в диапазоне [-10;10]. 3. Проитерироваться по массиву и заменить отрицательные элементы числом 1. 4. Вывести исходный и полученный в результате замены массивы.
Пример кода на языке Python: ```python import random
# Создаем пустой массив array = []
# Заполняем массив случайными числами в диапазоне [-10;10] for _ in range(12): array.append(random.randint(-10, 10))
# Выводим исходный массив print("Исходный массив:") print(array)
# Заменяем отрицательные элементы числом 1 for i in range(len(array)): if array[i] < 0: array[i] = 1
# Выводим массив после замены print("Массив после замены:") print(array) ```
Пример вывода: ``` Исходный массив: [-7, 5, -9, -3, -2, 8, 1, -10, 4, 7, -6, 3] Массив после замены: [1, 5, 1, 1, 1, 8, 1, 1, 4, 7, 1, 3] ```
В данном примере мы сначала создаем пустой массив `array`. Затем заполняем его 12 случайными числами в диапазоне [-10;10] с помощью генератора случайных чисел. Далее, мы проходим по массиву и заменяем все отрицательные числа числом 1. Наконец, выводим исходный и измененный массивы.


Похожие вопросы
Топ вопросов за вчера в категории Информатика







Последние заданные вопросы в категории Информатика
-
Математика
-
Литература
-
Алгебра
-
Русский язык
-
Геометрия
-
Английский язык
-
Химия
-
Физика
-
Биология
-
Другие предметы
-
История
-
Обществознание
-
Окружающий мир
-
География
-
Українська мова
-
Информатика
-
Українська література
-
Қазақ тiлi
-
Экономика
-
Музыка
-
Право
-
Беларуская мова
-
Французский язык
-
Немецкий язык
-
МХК
-
ОБЖ
-
Психология
-
Физкультура и спорт
-
Астрономия
-
Кыргыз тили
-
Оʻzbek tili