Question

1 вопрос Написать программу. Ввести c клавиатуры массив из 10 элементов, увеличить каждый элемент на 5 и вывести на экран. 2 вопрос Написать программу. Ввести c клавиатуры массив из 10 элементов. Увеличить на 5 все элементы в первой половине массива и увеличить в 5 раз все элементы во второй половине массива. Вывести на экран. 3 вопрос Написать программу. Заполните массив A из 10 элементов пятерками. ПАСКАЛЬ

Answer 1

Program Exp_1;

Var

  a:array[1..5] of integer;

  i:integer;

Begin

    for i:=1 to 5 do

    Begin

     write('Vvedite ',i,'-yi element massiva ');

     Readln(a[i]);

    End;

Write('Ishodny massiv: ');

for i:=1 to 5 do

 write(a[i],' ');

writeln;

writeln('Poluchenny massiv: ');

for i:=1 to 5 do

 write(a[i]+5,' ');

 Readln;

End.

Program Exp_2;

Var

  a:array[1..10] of integer;

  i:integer;

Begin

    for i:=1 to 10 do

    Begin

     write('Vvedite ',i,'-yi element massiva ');

     Readln(a[i]);

    End;

Write('Ishodny massiv: ');

for i:=1 to 10 do

 write(a[i],' ');

writeln;

writeln('Poluchenny massiv: ');

for i:=1 to 5 do

 write(a[i]+5,' ');

for i:=6 to 10 do

 write(a[i]*5,' ');

 Readln;

End.

Program Exp_3;

Const

n=10;

Var

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

  i:integer;

Begin

    for i:=1 to n do

    begin

    a[i]:=5;

    write(a[i]:3);

    read;

    end;

End.

Answer 2

Конечно, давайте рассмотрим каждый вопрос по отдельности.

1. Увеличение каждого элемента массива на 5:

# Пример на Python
array = [int(input("Введите элемент массива: ")) for _ in range(10)]

# Увеличиваем каждый элемент на 5
array = [element + 5 for element in array]

# Выводим результат
print("Массив после увеличения каждого элемента на 5:", array)

2. Увеличение первой половины массива на 5, второй половины - в 5 раз:

# Пример на Python
array = [int(input("Введите элемент массива: ")) for _ in range(10)]

# Увеличиваем первую половину на 5, вторую - в 5 раз
half_length = len(array) // 2
array[:half_length] = [element + 5 for element in array[:half_length]]
array[half_length:] = [element * 5 for element in array[half_length:]]

# Выводим результат
print("Массив после преобразования:", array)

3. Заполнение массива из 10 элементов пятерками (пример на языке Pascal):

program FillArrayWithFives;
var
  A: array[1..10] of integer;
  i: integer;
begin
  // Заполняем массив пятерками
  for i := 1 to 10 do
    A[i] := 5;

// Выводим массив на экран
  writeln('Массив после заполнения пятерками:');
  for i := 1 to 10 do
    writeln(A[i]);
end.

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