
Написать программу, заполняющую массив из 13 чисел [-10..10]. 1. Вывести массив. 2. Отсортировать
массив по возрастанию. Вывести 3. Определить в этом массиве сумму всех отрицательных чисел. 4. Уменьшить на 5 все элементы массива и вывести измен.мас

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

Ответ:
program Massiv_sort;
var a:array [1..13] of Integer;
i,so,j,v:Integer;
begin
write ('1. Массив ');
for i:=1 to 13 do
begin
a[i]:=random(21)-10;
if a[i]<0 then so:=so+a[i];
write (a[i], ' ')
end;
WriteLn;
for i:=1 to 12 do
for j:=1 to 13-i do
if a[j]>a[j+1] then
begin
v:=a[j];
a[j]:=a[j+1];
a[j+1]:=v
end;
write ('2. Массив ');
for i:=1 to 13 do write (a[i], ' ');
WriteLn;
WriteLn('3. Сумма отрицательных элементов ',so);
write ('4. Массив ');
for i:=1 to 13 do
begin
a[i]:=a[i]-5;
write (a[i], ' ')
end;
end.



Конечно! Вот пример программы на языке Python, которая выполняет указанные действия:
pythonimport random
# Создаем и заполняем массив из 13 чисел [-10..10]
array = [random.randint(-10, 10) for _ in range(13)]
# Выводим исходный массив
print("Исходный массив:", array)
# Сортируем массив по возрастанию
sorted_array = sorted(array)
# Выводим отсортированный массив
print("Отсортированный массив:", sorted_array)
# Вычисляем сумму всех отрицательных чисел
negative_sum = sum([num for num in array if num < 0])
# Выводим сумму отрицательных чисел
print("Сумма отрицательных чисел:", negative_sum)
# Уменьшаем на 5 все элементы массива
modified_array = [num - 5 for num in array]
# Выводим измененный массив
print("Измененный массив:", modified_array)
Программа создает массив из 13 случайных чисел в диапазоне от -10 до 10, выводит исходный массив, затем сортирует его по возрастанию и выводит отсортированный массив. Затем она вычисляет сумму всех отрицательных чисел в исходном массиве и выводит эту сумму. Далее все элементы исходного массива уменьшаются на 5, и измененный массив выводится на экран.


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