. Проанализувати словесну форму надання алгоритму. Встановити видповиднисть кожному маркеру до програми на мови Паскаль.

Відповідь:

#include <stdio.h>

#include <iostream>

#include <cstdlib>

#include <time.h>

using namespace std;

void randarr(int *arr,int size){

for(int i = 0; i < size; i++){

 arr[i] = rand() % 40 + 0;

}

}

void printarr(int *arr,int size){

for(int i = 0; i < size; i++){

 printf("%d\t", arr[i]);

}

}

void sortminmax(int *arr,int size){

for(int i = 0; i < size - 1; ++i){

 int small = i;

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

  if (arr[j] < arr[small]){

   small = j;

  }

 }

 swap(arr[i], arr[small]);

}

}

void sortmaxmin(int *arr,int size){

for(int i = 0; i < size - 1; ++i){

 int big = i;

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

  if (arr[j] > arr[big]){

   big = j;

  }

 }

 swap(arr[i], arr[big]);

}

}

int main(){

srand(time(NULL));

setlocale(LC_ALL, "Rus");

int size;

printf("Введите размер массива: ");

scanf("%d" , &size);

int *arr = new int[size];

printf("Массив: ");

randarr(arr,size);

printarr(arr,size);

printf("\nСортируем массив по возрастанию от наименьшего до наибольшего...");

printf("\nРезультат: ");

sortminmax(arr,size);

printarr(arr,size);

printf("\nСортируем массив по убыванию от наибольшего до наименьшего...");

printf("\nРезультат: ");

sortmaxmin(arr,size);

printarr(arr,size);

delete[] arr;    

return 0;

}

static void Main(string[] args)

   {

       Random rnd = new Random();

       int[] arr = new int[9];

       //Заполняем

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

       {

           arr[i] = rnd.Next(-10, 12);

       }

       int result = 1; ;

       //Перебираем

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

       {

           //Если кратен трем и не равен нулю

           if (arr[i] % 3 == 0 && arr[i] != 0)

           {

               Console.ForegroundColor = ConsoleColor.Red;

               result *= arr[i]; //Перемножаем

           }

           Console.Write(arr[i] + " ");

           Console.ForegroundColor = ConsoleColor.Gray;

       }

       Console.WriteLine($"{Environment.NewLine}Результат умножения: {result}");

       Console.ReadKey();

   }

Объяснение: