Рассчитать значение функции y=5x^2+x^2-7x-30 для значений аргумента 0; 1; 1,5; 6; -4
program функция;
var a, b, c, d, e, x1, y1: real;
procedure fun (var x, y: real) ;
begin
y1 : =5*x*sqr(x)+sqr(x) - 7*x-30;
end;
begin
read (a, b, c, d, e);
fun (a, y1) ;
write (y1) ;
fun (b, y1) ;
write (y1) ;
fun (c, y1) ;
write (y1) ;
fun (d; y1) ;
write (y1) ;
fun (e, y1) ;
write (y1) ;
end.

заранее !

Вычислим остатки от деления обоих чисел на 9, для этого заметив, что у числа 10a + c такой же остаток, что и у a + c. Тогда можно, считывая цифру за цифрой, получить остаток для всего числа. Дальше проверяем, чем равно произведение остатков: если делится на 9, то произведение делится на 9, иначе не делится.

function mod9(f: text): integer;
var
  c: char;
  rem: integer;
begin
  rem := 0;
  while not eoln(f) do
  begin
    read(f, c);
    rem := (rem + ord(c) - ord('0')) mod 9;
  end;
  readln(f);
  mod9 := rem;
end;
 
var
  f: text;
  a: integer;
 
begin
  assign(f, 'input.txt');
  reset(f);
  a := mod9(f) * mod9(f);
  close(f);
  assign(f, 'output.txt');
  rewrite(f);
  writeln(f, a);
  if a mod 9 = 0 then
    write(f, 'YES')
  else
    write(f, 'NO');
  close(f);
end.

Хорошо, давайте разберемся с вашим вопросом.

Перед тем, как приступить к решению задачи, давайте разберемся с основами. Что такое массив?

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

Теперь перейдем к самому решению. Для начала, нам потребуется включить библиотеку iostream, чтобы работать с вводом и выводом данных.

```cpp
#include
using namespace std;

int main()
{
const int MAX_SIZE = 100; // Максимальный размер массива
int arr[MAX_SIZE]; // Объявляем массив

int size; // Размер массива

// Запрашиваем размер массива у пользователя
cout << "Введите размер массива: ";
cin >> size;

// Запрашиваем элементы массива у пользователя
cout << "Введите элементы массива: ";
for (int i = 0; i < size; i++)
{
cin >> arr[i];
}

// "Сжимаем" массив
for (int i = 1; i < size; i += 2)
{
arr[i] = 0; // Заменяем каждый второй элемент нулем
}

// Выводим измененный массив
cout << "Измененный массив: ";
for (int i = 0; i < size; i++)
{
cout << arr[i] << " ";
}

return 0;
}
```

Давайте разберемся, как работает данный код.

1. На первых строках мы подключаем необходимые библиотеки и объявляем константу `MAX_SIZE`, которая определяет максимальный размер массива.

2. Затем мы объявляем сам массив `arr` с размером `MAX_SIZE`.

3. После этого мы запрашиваем у пользователя размер массива и элементы самого массива с помощью оператора `cin`.

4. Переходим к непосредственно "сжатию" массива. В цикле `for` с переменной `i` и с шагом 2 (так как нас интересуют каждый второй элемент), мы заменяем элементы на нули.

5. Наконец, выводим измененный массив на экран с помощью оператора `cout` и цикла `for`.

Теперь давайте проведем тестирование программы.

При пользовательском вводе элементов массива:
```
Введите размер массива: 5
Введите элементы массива: 1 2 3 4 5
```
Ожидаемый вывод:
```
Измененный массив: 1 0 3 0 5
```

При генерации элементов массива из диапазона [-14; 0]:
```
Введите размер массива: 8
Введите элементы массива: -4 -7 -14 -3 -7 -14 -5 -12
```
Ожидаемый вывод:
```
Измененный массив: -4 0 -14 0 -7 0 -5 0
```

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

Я надеюсь, что это объяснение будет понятным и полезным для вас, и поможет справиться с задачей. Если у вас возникнут еще вопросы, не стесняйтесь задавать их!