Вопрос задан 25.02.2021 в 02:51. Предмет Информатика. Спрашивает Потехин Илья.

одномерный массив из 7 элементов заполнить случайным образом числами от 5 до 35. заменить все

элементы массива больше 15 врстмерками, а элементы равные 5 нулями. вывести на экран монитора первоначальный и преобразованный массивы в столбик
0 0
Перейти к ответам

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

Внимание! Ответы на вопросы дают живые люди. Они могут содержать ошибочную информацию, заблуждения, а также ответы могут быть сгенерированы нейросетями. Будьте внимательны. Если вы уверены, что ответ неверный, нажмите кнопку "Пожаловаться" под ответом.
Отвечает Калинчук Мария.
Const n = 7;
var
a:array [1..n] of integer;
i:integer;
begin
writeln('Первоначальный массив');
for i:=1 to n do
begin
a[i]:=5+random(31);
writeln(a[i]);
end;
writeln('Преобразованный массив');
for i:=1 to n do
begin
if a[i]>15 then a[i]:=8;
if a[i]= 5 then a[i]:=0;
writeln(a[i]);
end;
end.
0 0
Отвечает нейросеть ChatGpt. Будьте внимательны, ответы нейросети могут содержать ошибочные или выдуманные данные.

Конечно! Вот пример кода на языке Python, который решает вашу задачу:

python
import random # Создание и заполнение массива случайными числами от 5 до 35 array = [random.randint(5, 35) for _ in range(7)] # Вывод первоначального массива print("Первоначальный массив:") for element in array: print(element) # Замена элементов массива больше 15 врстместо ними for i in range(len(array)): if array[i] > 15: array[i] = "врстмерка" # Замена элементов массива, равных 5, нулями array = [0 if element == 5 else element for element in array] # Вывод преобразованного массива print("\nПреобразованный массив:") for element in array: print(element)

Пример вывода:

Первоначальный массив: 21 32 10 8 5 29 17 Преобразованный массив: врстмерка врстмерка 10 8 0 врстмерка врстмерка

Обратите внимание, что вместо элементов, которые нужно заменить, я использовал строку "врстмерка", чтобы было заметно, какие элементы были заменены. Вы можете заменить это значение на любое другое по вашему усмотрению.

0 0

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

Последние заданные вопросы в категории Информатика

Задать вопрос