Нужна ! нужно написать программу в pascalabc, а точнее решить олимпиадную :
дано 5 натуральных чисел, не превышающих 2 000 000 000. вывести значение того из них, которое ближе к их среднему арифметическому. в случае наличия вариантов правильных ответов вывести меньший вариант.
пример:
входной файл 6 2 8 1 10
выходной файл 6
пояснение к примеру: среднее арифметическое равно (1+2+6+8+10)/5=5.4. минимальное значение модуля разности дает 6(0.6).

#include "stdafx.h"

#include < iostream>

using namespace std;

 

int main(int argc, char* argv[])

{

    cout < < "obrabotka massiva" < < endl;

    int array1[16] = { 5, -12, -12, 9, 10, 0, -9,

                    -12, -1, 23, 65, 64, 11, 43, 39, -15 }; // объявление и инициализация одномерного массива

    cout < < "indeks" < < "\t\t" < < "element massiva" < < endl; // печать заголовков

    for (int counter = 0; counter < 16; counter++)   //начало цикла

    {

    //вывод на экран индекса ячейки массива, а затем содержимого этой ячейки, в нашем случае - это целое число

    cout < < "array1[" < < counter < < "]" < < "\t\t" < < array1[counter] < < endl;

    }

    system("pause");

    return 0;

}

Итоги 3 партии: второй: 14; первый: 24. 1) Второй в третьей партии проиграл половину, следовательно 14 - это половина того , что у него было; значит первый в третьей партии выиграл 14, следовательно у него было на 14 меньше. Итоги второй партии: второй: 14*2=24; первый: 24-14=10. 2) Первый во второй партии проиграл половину , следовательно 10 - это половина того, что у него было; значит второй во второй партии выиграл 10, следовательно у него было на 10 меньше. Итого первой партии: второй: 28-10=18; первый: 10*2=20. 3) Второй в первой партии проиграл половину, следовательно 18- это половина того, что у него было; значит первый в первой партии выиграл 18, следовательно у него было на 18 меньше. Итоги до начала игры: второй: 18*2=36; первый: 20-18=2. ответ : 2 монеты было у первого пирата до начала игры. Проверка: второй: (36:2+10):2=14; первый: (2+18):2+14=24