Question

1.Заполнить линейный массив по формуле y[i]=корень x-5*c+x/14+a; 2.Заполнить случайным образом и вывести на экран только положительные не четные числа 3.В двуменрном массиве действитьельных чисел найти произведение отрицательных элементоВ больших =14; 4.Заменить к-й элеменит одномерного массива на произведение всех его элементов кратных 5;

Answer 1

1.                                                                        

program raf105;

const n = 10;

var y:array[1..n] of real;

i,x,c,a:integer;

begin

write('Введите значение X: ');

readln(x);

write('Введите значение C: ');

readln(c);

write('Введите значение A: ');

readln(a);

writeln('Элементы массива:');

for i:=1 to n do

begin

 y[i]:= sqrt(x-5*c+x/14+a);

 writeln(y[i]);

end;

end.

2.                                                                        

program raf105;

const n = 10;

var a:array[1..n] of integer;

i:integer;

begin

writeln('Положительные, нечётные элементы сгенерированного массива:');

for i:=1 to n do

begin

 a[i]:= random(-100,100);

 if (a[i] > 0) and ((a[i] mod 2) <> 0)

   then writeln(a[i]);

end;

end.

3.                                                                        

program raf105;

var a:array[1..3,1..3] of integer;

pro,i,j:integer;

begin

writeln('Вводите 9 чисел по очереди');

pro:= 1;

for i:=1 to 3 do

 for j:=1 to 3 do

 begin

   readln(a[i,j]);

   if (a[i,j]<0) and (a[i,j]>-14)

     then pro *= a[i,j];

 end;

writeln('Произведение отрицательных элементов больше -14:');

writeln(pro);

end.

4.                                                                        

program raf105;

const n = 10;

var a:array[1..n] of integer;

pro,k,i:integer;

begin

write('Номер заменяемого элемента: ');

readln(k);

writeln('Вводите ',n,' чисел по очереди');

pro:= 1;

for i:=1 to n do

begin

 readln(a[i]);

 if (a[i] mod 5)=0

   then pro *= a[i];

end;

a[k]:= pro;

write('Вывод: ');

for i:=1 to n do

 write(a[i],' ');

end.

Язык программирования PascalABC

Answer 2

Давайте рассмотрим каждое из ваших заданий по очереди и предоставим код на языке программирования Python для их решения:

1. Заполнить линейный массив по формуле y[i] = корень(x - 5 * c + x / 14 + a):

pythonCopy code
import math

# Заданные параметры
c = 2.0
a = 3.0
n = 10  # Размер массива

# Создаем пустой массив
y = []

# Заполняем массив согласно формуле
for x in range(n):
    result = math.sqrt(x - 5 * c + x / 14 + a)
    y.append(result)

# Выводим массив на экран
print(y)

2. Заполнить случайным образом и вывести на экран только положительные нечетные числа:

pythonCopy code
import random

# Заданный размер массива
n = 20

# Создаем пустой массив и заполняем его случайными числами
random_numbers = [random.randint(-100, 100) for _ in range(n)]

# Фильтруем положительные нечетные числа
filtered_numbers = [x for x in random_numbers if x > 0 and x % 2 != 0]

# Выводим отфильтрованный массив на экран
print(filtered_numbers)

3. В двумерном массиве действительных чисел найти произведение отрицательных элементов в больших строках, где сумма элементов больше 14:

pythonCopy code
import random

# Заданные параметры
rows = 5
cols = 5

# Создаем двумерный массив и заполняем его случайными числами
matrix = [[random.uniform(-10, 10) for _ in range(cols)] for _ in range(rows)]

# Находим произведение отрицательных элементов в строках, где сумма элементов больше 14
result = 1
for row in matrix:
    if sum(row) > 14:
        for elem in row:
            if elem < 0:
                result *= elem

# Выводим результат
print("Произведение отрицательных элементов в больших строках:", result)

4. Заменить k-й элемент одномерного массива на произведение всех его элементов, кратных 5:

pythonCopy code
# Заданный массив и индекс k
arr = [2, 5, 10, 15, 20, 25]
k = 3  # Пример индекса k (заменяем третий элемент)

# Вычисляем произведение элементов, кратных 5
product = 1
for element in arr:
    if element % 5 == 0:
        product *= element

# Заменяем k-й элемент на полученное произведение
if k < len(arr):
    arr[k] = product

# Выводим обновленный массив
print(arr)

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