Question

Ребят у кого с информатикой хорошо? 9 классПомогите пожалуйста срочно Написать программу для нахождения минимального элемента массива А(21).Написать программу, находящую номер первого и последнего отрицательного элементов массива Y(25).Вычислить среднее арифметическое положительных четных элементов массива А(N).

Answer 1

#1

var

A : array [1..21] of integer;

min : integer := 32766;

begin

for var i:=1 to 21 do

 readln(A[i]);

for var i:=1 to 21 do

if (A[i] < min) then

min := A[i];

writeln(min);

end.

#2

var

Y : array [1..25] of integer;

isthefirst : boolean := false;

last : integer := 0;

begin

for var i:=1 to 25 do

 readln(Y[i]);

for var i:=1 to 25 do

 if (Y[i] < 0) and (isthefirst = false) then

   begin

   writeln(i);

   isthefirst := true;

   break;

   end;

for var i:=2 to 25 do

begin

if (i = 25) then  

begin

if (Y[i] < 0) and (last = 0) then

last := i;

break;

end;

if ((Y[i+1] > 0) and (Y[i] < 0)) then

last := i;

end;

if (isthefirst) and (last = 0) then

last := 1;

if (last <> 0) then

writeln(last) else

writeln('There''no numbers');

end.

//Не бейте за кастыли пожалуйста. Мне лень думать)))000

#2

type TIntMassiv = array of Integer;   //Дин. Массив (Более гибок в работе)

var  

n : integer;

sum : integer := 0;

counter : integer := 0;

var A: TIntMassiv;

begin

readln (n);

SetLength(A, n);

for var i:=0 to n-1 do

begin

readln(A[i]);

if (A[i] > 0) and (A[i] mod 2 = 0) then

begin

sum += A[i];

counter += 1;

end;

end;

if (sum = 0) or (counter = 0) then

begin

writeln('There''re no numbers');

exit;

end;

writeln(sum/counter);

end.

Answer 2

Конечно, я могу помочь вам с этими задачами. Вот программы на языке Python для решения каждой из них:

1. Нахождение минимального элемента в массиве А(21):

pythonCopy code
A = [5, 2, 8, 3, 1, 7, 6, 4, 9, 10, 12, 11, 15, 14, 13, 16, 18, 17, 20, 19, 25]
min_element = min(A)
print("Минимальный элемент в массиве A:", min_element)

2. Нахождение номера первого и последнего отрицательного элемента в массиве Y(25):

pythonCopy code
Y = [-3, 2, -5, 7, 0, -8, 10, -12, 15, 14, -13, 16, 18, -17, 20, 19, -25, 30, 22, -1, 27, 9, -11, 6, -4]
first_negative_index = -1
last_negative_index = -1

for i in range(len(Y)):
    if Y[i] < 0:
        if first_negative_index == -1:
            first_negative_index = i
        last_negative_index = i

if first_negative_index != -1:
    print("Номер первого отрицательного элемента:", first_negative_index)
    print("Номер последнего отрицательного элемента:", last_negative_index)
else:
    print("В массиве Y нет отрицательных элементов.")

3. Вычисление среднего арифметического положительных четных элементов массива А(N):

pythonCopy code
A = [5, 2, 8, 3, 1, 7, 6, 4, 9, 10, 12, 11, 15, 14, 13, 16, 18, 17, 20, 19, 25]
positive_even_elements = [x for x in A if x > 0 and x % 2 == 0]

if len(positive_even_elements) > 0:
    average = sum(positive_even_elements) / len(positive_even_elements)
    print("Среднее арифметическое положительных четных элементов:", average)
else:
    print("В массиве A нет положительных четных элементов.")

Вы можете вставить эти программы в среду программирования на Python и запустить их для получения результатов.