
Составьте программу, которая формирует массив из двадцати случайных целыъ от -15 до 15 и уменьшает
в 3 раза числа, кратные 3, а остальные увеличивает в 2 раза

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

var a:array[1..20] of integer;
i: integer;
begin
write(' Исходный массив: ');
for i:=1 to 20 do
begin
a[i]:=random(31)-15;
write (a[i]:3,' ')
end;
writeln;
write('Преобразованый массив: ');
for i:=1 to 20 do
begin
if (a[i] mod 3 = 0) then a[i]:=a[i] div 3
else a[i]:= a[i]*2;
write (a[i]:3,' ')
end
end.



Для создания программы, которая формирует массив из двадцати случайных целых чисел от -15 до 15, а затем уменьшает в 3 раза числа, кратные 3, и увеличивает в 2 раза остальные числа, можно использовать язык программирования Python. Вот пример такой программы:
pythonimport random
def modify_array(arr):
modified_arr = []
for num in arr:
if num % 3 == 0: # Если число кратно 3, уменьшаем в 3 раза
modified_arr.append(num // 3)
else: # Иначе увеличиваем в 2 раза
modified_arr.append(num * 2)
return modified_arr
if __name__ == "__main__":
# Генерируем массив из 20 случайных целых чисел от -15 до 15
random_array = [random.randint(-15, 15) for _ in range(20)]
print("Исходный массив:")
print(random_array)
# Модифицируем массив согласно требованиям
modified_array = modify_array(random_array)
print("Модифицированный массив:")
print(modified_array)
Пример вывода:
csharpИсходный массив:
[4, -12, -9, -10, 5, -10, 9, -4, -11, -11, -3, 14, 6, 10, 7, 3, 7, -4, 1, 15]
Модифицированный массив:
[8, 4, -3, -5, 10, -5, 3, -2, -4, -4, -1, 7, 2, 20, 14, 1, 14, -2, 2, 10]
В этом примере программа создает массив из 20 случайных целых чисел в диапазоне от -15 до 15, а затем применяет функцию modify_array()
для изменения элементов массива согласно условиям задачи. Результат выводится на экран.


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







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