Вінтернет-магазині до акції святого миколая відбувається - вопрос №10326899 от sevi88 27.11.2020 23:10

Question

Информатика: Вінтернет-магазині до акції святого миколая відбувається акція - купуючи два будь-які товари, третій отримає безкоштовно , а внизу дрібним шрифтом приписано трьох обраних вами товарів, які ви платите дві найдорожчі . переглянувши повний перелік товарів, які будуть пропонуватися в інтернет-магазині, та їх вартість, петрик вирішив, які товари він хоче придбати. відповідно, йому потрібно визначити, яку мінімальну суму грошей він може витратити на таку покупку. формат вхідного файлу вхідний файл спочатку

sevi88 · Answer

Может быть, так:uses graphABC;Beginsetfontcolor(clRed);writeln( Белеет парус одинокой );setfontcolor(clBlue);writeln( В тумане моря голубом!.. );setfontcolor(clDarkOrchid);writeln( Что ищет он в стране далекой? );setfontcolor(clDeepSkyBlue);writeln( Что кинул он в краю родном?.. );setfontcolor(clDeepPink);writeln( Играют волны - ветер свищет, );setfontcolor(clMagenta);writeln( И мачта гнётся и скрыпит... );setfontcolor(clDarkGreen);writeln( Увы! он счастия не ищет );setfontcolor(clLime);writeln(...