Выполнить задание в Паскале.

Задача 1 1) 18 меняем на 2 => убралась 1 восьмерка. 2) 288 меняем на 3 => убралось ещё 2 восьмерки и всего 3. 3) 3888 меняем на 1 => убралось ещё 3 восьмерки и всего 6. Далее цикл повторяется убирая по 6 восьмёрок каждый раз. 80:6=13 и 2 в остатке, т.е. после 13-го цикла строка будет 188. Ещё раз заменим 18 на 2 и останется 28. На этом работа редактора закончится. Итог - строка 28 Задача 2 Здесь цикл из 4 операций: 3 раза меняем по 3 восьмерки на двойку и 1 раз меняем 3 двойки на восьмерку, т.е. всего убирается 9 восьмерок и добавляется 1 восьмерка. Таких циклов полностью будет 62:8=7 и 6 в остатке. Т.е. по окончании 7-го цикла останется строка из 6 восьмерок. Они заменяется на 2 двойки и работа редактора закончится. Итог - строка 22 Задача 3 Здесь цикл из 5 операций: Дважды 4444 меняем на 77 и один раз 777 на 4. Остаётся 74444 Ещё 1 раз 4444 на 77 и 1 раз 777 на 4. Итого убирается 10 четвёрок. Всего их 192, значит всего циклов 192:10=19 и остаётся 2 четверки, которые уже не меняются. Итог: строка 44.

# include <iostream>

using namespace std;

int main() {

int n;

cout << "n = ";

cin >> n;                                  //ввод кол-ва строк в треугольннике

int **a = new int *[n + 1];

for (int i = 0; i <= n; i++)

 a[i] = new int[n + 1];            //выделяем память под i-ую строку      

//заполняем массив

a[0][0] = 1;

a[1][0] = a[1][1] = 1;

for (int i = 2; i <= n; i++) {

 a[i][0] = 1;

 for (int j = 1; j < i; j++)

  a[i][j] = a[i - 1][j - 1] + a[i - 1][j];

 a[i][i] = 1;

}

//вывод массива на экран    

for (int i = 0; i <= n; i++, cout << endl)

 for (int j = 0; j <= i; j++)

  cout << a[i][j] << " ";

cout << endl;

//номер элемента в стр массива b - это i в данной формуле (a*x^i) штрих = a*i*x^(i-1), т е i - это индекс j

int **b = new int *[n + 1];         //создаем массив b для значений коэф-в производных          

for (int i = 0; i <= n; i++)

 b[i] = new int[n + 1];

//заполняем массив b

b[0][0] = 0;                     //дальше будем скадывать элементы a и b значит ячейки не должны быть пустыми

for (int i = 1; i <= n; i++) {

 b[i][i] = 0;

 for (int j = 1; j <= i; j++)

  b[i][j - 1] = j * a[i][j];

}

//вывод массива b на экран    

for (int i = 0; i <= n; i++, cout << endl)

 for (int j = 0; j <= i; j++)

  cout << b[i][j] << " ";

 

 system("pause");

 return 0;

}