Напишите программы которые изображают на экране следующие картинки

var

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

  i:integer;

begin

  randomize;

  writeln('Сгенерированный массив:');

  for i := 1 to 12 do

  begin

    a[i] := random(36) - 15;

    write(a[i], ' ');

  end;

  writeln;

end.

//вторая программа

const

  n = 8;

var

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

  i, count3, count4, count5:integer;

begin

  randomize;

  writeln('Оценки учеников:');

  for i := 1 to n do

  begin

    a[i] := random(3) + 3;

    write(a[i], ' ');

    if a[i] = 5 then

      inc(count5);

    if a[i] = 4 then

     inc(count4);

    if a[i] = 3 then

      inc(count3);

  end;

  writeln;

  writeln('Троек - ', count3);

  writeln('Четверок - ', count4);

  writeln('Пятерок - ', count5);

end.

//третья программа

var

  k:array[1..12] of integer;

  i:integer;

begin

  randomize;

  writeln('Сгенерированный массив:');

  for i := 1 to 12 do

  begin

    k[i] := random(36) - 15;

    write(k[i], ' ');

  end;

  writeln;

  writeln('Преобразованный массив:');

  for i := 1 to 12 do

  begin

    k[i] := k[i] * (-1);

    write(k[i], ' ');

  end;

end.

#include <iostream>

using namespace std;

int main()

{

   int line, column;

   cout << "Введите количество строк и столбцов через пробел: ";

   cin >> line >> column;

   int array[50][50] = {};

   cout << "Введите элементы двумерного массива: \n";

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

   {

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

       {

           cin >> array[i][j];

       }

       cout << endl;

   }

   int amount = 0;

   int line_index;

   cout << "Введите индекс строки массива: ";

   cin >> line_index;

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

   {

       int i = line_index;

       amount += array[i][j];

   }

   if (amount % 10 == 0)

   {

       cout << "YES";

   }

   else

   {

       cout << "NO";

   }

}

Объяснение:

#include <iostream>  // Библиотека ввода - вывода

using namespace std;  // Пространство имен

int main()

{

   int line, column;  // Создание целочисленных переменных, отвечающих за количество строк и столбцов в двумерном массиве

   cout << "Введите количество строк и столбцов через пробел: ";  // Вывод сообщения в консоль

   cin >> line >> column;  // Ввод количества строк и столбцов с клавиатуры

   int array[50][50] = {};  // Создание целочисленного массива размером 50х50

   cout << "Введите элементы двумерного массива: \n";  // Вывод сообщения в консоль

   for (int i = 0; i < line; i++ )  // Ввод элементов массива

   {  // Ввод элементов массива

       for (int j = 0; j < column; j++)  // Ввод элементов массива

       {  // Ввод элементов массива

           cin >> array[i][j];  // Ввод элементов массива

       }  // Ввод элементов массива

       cout << endl;  // Ввод элементов массива

   }  // Ввод элементов массива

   int amount = 0;  // Создание целочисленной переменной, хранящей сумму нужной строки

   int line_index;  // Переменная, хранящая индекс нужной строки

   cout << "Введите индекс строки массива: ";  // Вывод сообщения в консоль

   cin >> line_index;  // Ввод индекса нужной строки с клавиатуры

   for (int j = 0; j < column; j++)  // Находим все элементы нужной строки

   {

       int i = line_index;  // Нужна сумма определенной строки ⇒ значение переменной i будет постоянным

       amount += array[i][j];  // Переменная, хранящая сумму элементов нужной строки, суммируется с элементами строки

   }

   if (amount % 10 == 0)  // Если последняя цифра суммы = 0

   {

       cout << "YES";  // Выводим "YES"

   }

   else  // Иначе

   {

       cout << "NO";  // Выводим "NO"

   }

}