М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
TheCool111
TheCool111
18.02.2022 15:56 •  Информатика

Марат устроился работать в магазин комиксов. Всё в работе его радует, кроме необходимости постоянно выдавать сдачу покупателям. У Марата есть неограниченное количество монет следующих номиналов: 1, 4, 13, 21, 22, 50

Сегодня к нему пришли пять покупателей которым нужно выдать следующие суммы сдачи:

29
38
46
79
107

Марату — для каждого значения сдачи выведите набор монет, которым его можно получить, и из всех таких наборов выберите минимальный по количеству монет. Номиналы монет можно выводить в любом порядке.

В ответе нужно записать пять строк, в каждой строке запишите через пробел монеты, которые дают нужную Марату сумму (в любом порядке).

Например, если бы Марату надо было дать 7 рублей сдачи, то ответ может иметь вид

1 4 1 1
Порядок строк в ответе менять нельзя. Если вы не можете найти ответ для какой-то из сумм, вместо этого ответа запишите любое целое число.

Чем меньше монет вы используете для выдачи сдачи, тем больше получите.
!

👇
Ответ:
Halula
Halula
18.02.2022

21 4 4

21 13 4

21 21 4

50 21 4 4

50 22 22 13

Объяснение:

отметь как лучшее объяснение )

4,5(18 оценок)
Ответ:
tseykalo18
tseykalo18
18.02.2022

21 4 4

21 13 4

21 21 4

50 21 4 4

50 22 22 13

Объяснение:

4,4(81 оценок)
Открыть все ответы
Ответ:
shoeva02
shoeva02
18.02.2022
1. Короткий современный вариант ("один оператор")

// PascalABC.NET 3.1, сборка 1230 от 27.04.2016
begin
  Writeln('Sпол.неч = ',ArrRandom(50,-10,20).Println
    .Where((x,i)->(x>0) and (i.IsEven)).Sum)
end.

Тестовое решение
15 16 0 17 20 7 -3 -4 9 9 -3 -8 14 10 10 11 7 18 -8 8 0 15 1 4 11 1 9 -10 -7 -7 12 17 8 13 7 15 1 13 12 11 4 -5 -3 -6 -5 -10 -9 -8 8 -8
Sпол.неч = 148

2. Длинный "школьный" вариант ("почувствуйте разницу")

// PascalABC.NET 3.1, сборка 1230 от 27.04.2016
var
  a:array[1..50] of integer;
  i,s:integer;
begin
  Randomize;
  s:=0;
  for i:=1 to 50 do begin
    a[i]:=Random(31)-10; Write(a[i],' ');
    if (a[i]>0) and Odd(i) then s:=s+a[i]
    end;
  Writeln;
  Writeln('Sпол.неч = ',s)
end.

Тестовое решение
4 14 4 7 9 -4 3 6 20 -10 3 -3 15 12 9 0 3 12 13 -1 9 -2 -2 16 18 -2 5 9 17 -3 4 -6 10 10 -5 10 8 13 12 15 13 1 12 1 7 6 9 2 -9 -6
Sпол.неч = 207
4,8(25 оценок)
Ответ:
Русик271
Русик271
18.02.2022
1. отметьте все правильно записанные формулы. =2*a3*b2   =a1+сумм(b1: c3)   2. отметьте все правильные адреса ячеек и диапазонов электронной таблицы.   a5: b8 c7: b16 3. сколько ячеек входит в диапазон a7: b12? ответ:   12  4. в электронной таблице выделены 20 ячеек, расположенных в столбце h, начиная со строки 9. запишите адрес выделенного диапазона.   ответ: h9: h28 5. в электронной таблице выделен диапазон из 8 ячеек, расположенный в столбцах a и b. правый нижний угол диапазона находится в ячейке b8. запишите адрес диапазона.   ответ: a5: b8 6. в электронной таблице выделен диапазон из 9 ячеек, расположенный в столбцах c, d и e. правый нижний угол диапазона находится в ячейке e8. запишите адрес диапазона. ответ:   c6: e8 7. какую формулу нужно записать в ячейку b5, чтобы вычислить значение x по формуле, на рисунке? ответ:   8. запишите адрес выделенного диапазона. ответ:   9. запишите адрес выделенного диапазона. ответ:     10. замените формулу, используя один вызов функции сумм:=a3+a4+a5+b3+b4+b5 ответ:   =сумм(a3: b5) 11. замените формулу, используя два вызова функции сумм:=a3+a4+a5+b7+b8+b9+c7+c8+c9 ответ:   =сумм(a3: c9)
4,8(84 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ