Question

⚠СРОЧНО ПОМОГИТЕ ⚠3. В какой строке приведено правильное заполнение массива а из 7 целых чисел случайным образом, значения которых находятся в диапазоне от 0 до 24: For i:=1 to 24 do а[i]:=random(7)For i:=1 to 7 do а[i]:=random(7)For i:=1 to 7 do а[i]:=random(24)For i:=1 to 24 do а[i]:=random(24)4. Запишите значения элементов массива (в строчку через запятую), сформированного следующим образом:For i:=1 to 6 do b[i]:=i*i-3Практическая часть: написать программу, в результате работы которой будет заполнен и выведен в строчку на экран целочисленный массив С из 5 элементов. Значения элементов массива вводятся с клавиатуры. Выполнить:1. Вычислить сумму элементов массива2. Сортировку по убыванию(практическую часть не обязательно )​

Answer 1

Ответ:

в третьем: третья строка.

в четвертом: -2, 1, 6, 16, 21, 33.

Практику не смогу(

Answer 2

Давайте разберемся с вашими вопросами по очереди:

1. Правильное заполнение массива а из 7 целых чисел случайным образом, значения которых находятся в диапазоне от 0 до 24, можно выполнить с помощью следующей строки кода:

pascalCopy code
For i := 1 to 7 do а[i] := random(25);

Этот код заполнит массив а из 7 элементов случайными целыми числами в диапазоне от 0 до 24.

2. Запишите значения элементов массива b, сформированного следующим образом:

pascalCopy code
For i := 1 to 6 do b[i] := i*i - 3;

Этот код заполнит массив b из 6 элементов согласно заданному выражению.

3. Для решения практической части, где нужно заполнить и вывести массив C из 5 элементов с клавиатуры, а также выполнить вычисление суммы элементов массива, вам потребуется код на языке Pascal, который мог бы выглядеть примерно так:

pascalCopy code
program ArrayManipulation;

var
  C: array[1..5] of Integer;
  i, sum: Integer;

begin
  // Заполнение массива C с клавиатуры
  writeln('Введите 5 целых чисел:');
  for i := 1 to 5 do
  begin
    write('C[', i, '] = ');
    readln(C[i]);
  end;

  // Вывод значений массива C в строчку через запятую
  write('Значения массива C: ');
  for i := 1 to 5 do
  begin
    write(C[i]);
    if i < 5 then
      write(', ');
  end;
  writeln;

  // Вычисление суммы элементов массива C
  sum := 0;
  for i := 1 to 5 do
  begin
    sum := sum + C[i];
  end;
  writeln('Сумма элементов массива C: ', sum);
end.

Этот код позволит вам ввести значения элементов массива с клавиатуры, вывести их в строчку через запятую и вычислить сумму элементов массива C.