Question

4 а) составьте программу ,которая заполняет массив а[1..10 ] случайными целыми числами в диапозоне от 1 до 10 , затем элементы с четными индексами удваиваются , а элементы с нечетными индексами утраивает.Выведите на экран исходный и полученный массив. б)составьте программу ,которая заполняет массив b[1..8 ] случайными целыми числами в диапозоне от 1 до 10 , затем изменяет знак элементов с четными индексами на противоположный .Выведите на экран исходный и полученный массивы.5) а)составьте программу ,которая заполняет массив а[1..10 ] случайными целыми числами в диапозоне от 1 до 10 ,и находит количество элементов ,которые больше своего соседа слева б)составьте программу ,которая заполняет массив b[1..8 ] случайными целыми числами в диапозоне от 1 до 10 и находит количество пар элементов с четными значениями.6) а)составьте программу ,которая заполняет массив а[1..20 ] случайными целыми числами в диапозоне от 1 до 10 ,и находит среднее арифметическое элементов с четными значениями и нечетными индексами.б) составьте программу ,которая заполняет массив b[1..15 ] случайными целыми числами в диапозоне от 1 до 20 и выводит все тройки элементов , упорядоченные строго по возрастанию.напишите хоть какое нибудь нужно к завтрому срочно

Answer 1

4 а)
const n=10;
var a:array[1..n] of integer; i,k:integer;
begin
writeln('Исходный массив: ');
for i:=1 to n do begin
a[i]:=random(10);
write(' ',a[i]);
end;
writeln;
for i:=1 to n do begin
if ((i mod 2) = 0) then
a[i]:=a[i]*2
else
a[i]:=a[i]*3;
end;
writeln('Конечный массив: ');
for i:=1 to n do 
write(' ',a[i]);
end.
б)
const n=10;
var a:array[1..n] of integer; i,k:integer;
begin
writeln('Исходный массив: ');
for i:=1 to n do begin
a[i]:=random(10);
write(' ',a[i]);
end;
writeln;
for i:=1 to n do begin
if ((i mod 2) = 0) then
a[i]:=a[i]-a[i]*2;
end;
writeln('Конечный массив: ');
for i:=1 to n do 
write(' ',a[i]);
end.
5 a)
const n=10;
var a:array[1..n] of integer; i,k:integer;
begin
k:=0;
writeln('Исходный массив: ');
for i:=1 to n do begin
a[i]:=random(10);
write(' ',a[i]);
end;
writeln;
for i:=1 to n do begin
if (i>2) and (a[i]>a[i-1]) then
k:=k+1;
end;
writeln('Конечный массив: ');
for i:=1 to n do
 write(' ',a[i]);
writeln;
write('Кол-во элементов больших соседа слева ',k);
end.
5 б)
const n=10;
var a:array[1..n] of integer; z,i,k:integer;
begin
k:=0;
z:=0;
writeln('Исходный массив: ');
for i:=1 to n do begin
a[i]:=random(10);
write(' ',a[i]);
end;
writeln;
for i:=1 to n do begin
if ((i mod 2) = 0) then
k:=k+1;
if k=2 then
 begin 
k:=0;
z:=z+1;
end;
end;
writeln('Конечный массив: ');
for i:=1 to n do 
write(' ',a[i]);
writeln;
write('Кол-во четных пар: ',z);
end.
6 а)
const n=10;
var a:array[1..n] of integer; s,k,i:integer;
sr:real;
begin
s:=0;
k:=0;
writeln('Исходный массив: ');
for i:=1 to n do begin
a[i]:=random(10);
write(' ',a[i]);
end;
writeln;
for i:=1 to n do begin
if ((a[i] mod 2) = 0) and ((i mod 2) <> 0) then
begin
s:=s+a[i];
k:=k+1;
end;
end;
sr:=s/k;
writeln('Конечный массив: ');
for i:=1 to n do 
write(' ',a[i]);
writeln;
write('Среднее арифметическое четных элементов с нечетными индексами: ',sr);
end.

Answer 2

Программа для заполнения массива и изменения элементов

а) Для заполнения массива `a[1..10]` случайными целыми числами в диапазоне от 1 до 10 и удвоения элементов с четными индексами, а также утроения элементов с нечетными индексами, вы можете использовать следующий код на языке Python:

import random

a = [random.randint(1, 10) for _ in range(10)]  # заполнение массива случайными числами

for i in range(len(a)):
    if i % 2 == 0:  # четные индексы
        a[i] *= 2  # удваиваем элемент
    else:
        a[i] *= 3  # утраиваем элемент

print("Исходный массив:", a)

б) Для заполнения массива `b[1..8]` случайными целыми числами в диапазоне от 1 до 10 и изменения знака элементов с четными индексами на противоположный, вы можете использовать следующий код на языке Python:

import random

b = [random.randint(1, 10) for _ in range(8)]  # заполнение массива случайными числами

for i in range(len(b)):
    if i % 2 == 0:  # четные индексы
        b[i] *= -1  # изменяем знак элемента

print("Исходный массив:", b)

Программа для нахождения количества элементов

5) а) Для заполнения массива `a[1..10]` случайными целыми числами в диапазоне от 1 до 10 и нахождения количества элементов, которые больше своего соседа слева, вы можете использовать следующий код на языке Python:

import random

a = [random.randint(1, 10) for _ in range(10)]  # заполнение массива случайными числами

count = 0
for i in range(1, len(a)):
    if a[i] > a[i - 1]:  # элемент больше своего соседа слева
        count += 1

print("Количество элементов, больших своего соседа слева:", count)

б) Для заполнения массива `b[1..8]` случайными целыми числами в диапазоне от 1 до 10 и нахождения количества пар элементов с четными значениями, вы можете использовать следующий код на языке Python:

import random

b = [random.randint(1, 10) for _ in range(8)]  # заполнение массива случайными числами

count = 0
for i in range(len(b) - 1):
    if b[i] % 2 == 0 and b[i + 1] % 2 == 0:  # оба элемента четные
        count += 1

print("Количество пар элементов с четными значениями:", count)

Программа для нахождения среднего арифметического

6) а) Для заполнения массива `a[1..20]` случайными целыми числами в диапазоне от 1 до 10 и нахождения среднего арифметического элементов с четными значениями и нечетными индексами, вы можете использовать следующий код на языке Python:

import random

a = [random.randint(1, 10) for _ in range(20)]  # заполнение массива случайными числами

count = 0
total = 0
for i in range(len(a)):
    if i % 2 != 0 and a[i] % 2 == 0:  # нечетные индексы и четные значения
        count += 1
        total += a[i]

average = total / count if count > 0 else 0  # среднее арифметическое или 0, если нет элементов

print("Среднее арифметическое элементов с четными значениями и нечетными индексами:", average)

б) Для заполнения массива `b[1..15]` случайными целыми числами в диапазоне от 1 до 20 и вывода всех троек элементов, упорядоченных строго по возрастанию, вы можете использовать следующий код на языке Python:

import random

b = [random.randint(1, 20) for _ in range(15)]  # заполнение массива случайными числами

for i in range(len(b) - 2):
    if b[i] < b[i + 1] < b[i + 2]:  # тройка элементов упорядочена строго по возрастанию
        print(b[i], b[i + 1], b[i + 2])

Надеюсь, эти программы помогут вам. Если у вас возникнут дополнительные вопросы, не стесняйтесь задавать их!