В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
dashkin678
dashkin678
07.09.2020 05:15 •  Информатика

Кирилл,

Айбар и Султан начали писать контест.

В контесте всего n задач и длится 5 часов.

Они уже оценили время которое они потратят на каждую задачу. Кирилл решает задачу с

номером i за ai минут. Айбар за bi

. Султан за ci

.

Как и всегда нужно решить как можно больше задач с меньшим штрафом.

Штраф определяется как сумма времени решения для каждой принятой задачи.

Например, если команда сдаст первую задачу на 5 минуте, а вторую на 10 минуте то штраф

будет равен 5 + 10 = 15.

Вам нужно определить какой самый лучший результат может получить команда.

Формат входных данных

В первой строке дано одно целое числа n (1 6 n 6 10) - количество задача на контесте.

В следующих n строк даны по три числа ai

, bi и ci (1 6 ai

, bi

, ci 6 500) - время которое Кирилл,

Айбар и Султан потратят на задачу соответственно.

Формат выходных данных

Выведи максимальное количество задач и минимальный штраф.


Кирилл,Айбар и Султан начали писать контест.В контесте всего n задач и длится 5 часов.Они уже оценил

Показать ответ
Ответ:
elizawetailjin
elizawetailjin
28.04.2020 22:37
//Я так понял, что нужно объеденить 2 массива в 1 большой. Если же нужно, чтобы каждый элемент третьего массива состоял из суммы элементов с такии же индексом двух предыдущих массивов, то нужен другой код

Program Test;

const Size = 5; x = 1; y = 10;

Var i, j, Entered: integer; Arr1: array[1..Size] of integer; Arr2: array[1..Size] of integer; Arr3: array[1..Size * 2] of integer;

Begin

Randomize;

j := 0;

for i := 1 to Size do
begin
Arr1[i] := Random(x, y);
Arr2[i] := Random(x, y);
end;

for i := 1 to Size * 2 do
begin
if (i <= Size) then
Arr3[i] := Arr1[i]

else
begin
j := j + 1;
Arr3[i] := Arr2[j];
end;
end;

Write('Показать 1 массив? Если да, то введи 1: ');
Readln(Entered);

if (Entered = 1) then
begin
Writeln();

for i := 1 to Size do
Writeln('Элемент ', i, ' = ', Arr1[i]);
end;

Writeln();
Entered := 0;

Write('Показать 2 массив? Если да, то введи 2: ');
Readln(Entered);

if (Entered = 2) then
begin
Writeln();

for i := 1 to Size do
Writeln('Элемент ', i, ' = ', Arr2[i]);
end;

Writeln();
Writeln('Суммарный массив:');
Writeln();

for i := 1 to Size * 2 do
Writeln('Элемент ', i, ' = ', Arr3[i]);

End.
Нужно составить прогораму. даны два массива сформированных случайным образом, составить программу ко
Нужно составить прогораму. даны два массива сформированных случайным образом, составить программу ко
Нужно составить прогораму. даны два массива сформированных случайным образом, составить программу ко
0,0(0 оценок)
Ответ:
karinakarim
karinakarim
30.07.2022 23:34

Характеристика моего компьютера.

Имя объекта - компьютер. (от английского computer)

Функции объекта - Хранение, обработка и анализ данных.

Элементный состав компьютера -

Основные:

1) Монитор.

2) Клавиатура.

3) Компьютерная мышь.


4) Системный блок.

5) Колонки.

Дополнительные:


1) Веб-камера.


2) Съёмные ОЗУ-накопители.


3) Съёмные накопители.

4) Наушники.

Свойства элементов - элементный состав компьютера выполняет множество свойств, к примеру монитор необходим для того, чтобы выводить графическую или текстовую информацию. Мышь - для управления объектами на рабочем столе. (Ярлыками, папками, документами) Клавиатура - для ввода данных в сам компьютер. Колонки необходимы для вывода звука. Системный блок выполняет функцию опоры всего элементного состава компьютера.

0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота