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

Как-то раз Йорик ловил рыбу, а поймал волшебную лампу джина. Конечно, первое его желание было получить миллион долларов, а последним он даровал джину свободу. А вот над вторым желанием мальчик подумал как следует. Поскольку Йорик очень любил свой телефон и очень не любил платить за электричество, он пожелал переворачивать значение заряда батареи.

Формально, если на данный момент значение заряда равно Z, то после волшебной трансформации цифры числа Z запишутся в обратном порядке, а затем уничтожатся все лидирующие нули.

Примеры волшебной трансформации:

81↦18
27↦72
100↦1
0↦0
7↦7
13↦31
40↦4

Помимо своего телефона Йорик очень любит неотрицательное целое число X. И сейчас ему вдруг захотелось увидеть знакомые цифры на экране. Взглянув на значение заряда батареи, Йорик определил, что он равен N процентов. Как мы помним, мальчику не нравится платить за электричество, которое расходуется во время зарядки телефона. Понятно, что при некоторых N и X Йорику не добиться X процентов, если он будет только ждать, пока батарея разрядится, и использовать волшебную трансформацию. Поэтому для того, чтобы сэкономить, Йорик решил

использовать одну или несколько волшебных трансформаций в начале и/или в любой момент сколько угодно раз (быть может, ни одного);
заряжать телефон в любой момент на некоторое число процентов или не заряжать вообще, если при этом он сможет получить X% заряда;
ждать сколько угодно (возможно, нисколько), если оптимальная стратегия требует, чтобы в какой-то момент заряд понизился.
Цель Йорика — получить из N% зарядки X% и при этом минимизировать суммарное число процентов P, на которое увеличился заряд батареи в течение непосредственной зарядки через провод. Вам требуется написать программу, определяющую значение P для данных N и X.

Входные данные
Первая строка содержит целое число T (1≤T≤106) — количество наборов входных данных.

В каждой из следующих T строк задаются два целых числа N и X (0≤N≤100, 0≤X≤100) — значение заряда батареи телефона на данный момент и заряд, который необходимо получить.

Выходные данные
Для каждой из T строк выведите одно целое число — искомое минимальное число процентов зарядки, которого не хватает Йорику, чтобы получить X% описанным .

Показать ответ
Ответ:
амаеру
амаеру
18.03.2023 07:14
1.
const n=20; 
var
  a:array[1..n] of integer;
  i,k,s:integer;
begin
Randomize;
writeln('Исходный массив:');
for i:=1 to n do begin
  a[i]:=Random(51)-25;
  Write(a[i]:4)
end;
writeln;
write('K = '); readln(k);
s:=0;
for i:=1 to n do 
 if a[i] mod k = 0 then s:=s+a[i];
Writeln('s = ',s);
end.

Пример:
Исходный массив:
18 -24 -4 -21 15 19 18 -16 -1 -8 7 -21 21 22 -24 -4 18 -16 24 4
K = 3
s = 24

2.
const n=10; 
var
  a:array[1..n] of integer;
  i:integer;
begin
Randomize;
writeln('Исходный массив:');
for i:=1 to n do begin
  a[i]:=Random(11);
  Write(a[i]:4)
end;
writeln;
writeln('Выбранные элементы:');
for i:=1 to n do 
 if a[i]<=i then Write(a[i]:4) else write(' ':4);
Writeln;
end.

Пример:
Исходный массив:
   9   1   2   8   2   7   1  10   8   3
Выбранные элементы:
       1   2       2       1       8   3
0,0(0 оценок)
Ответ:
amusabekova
amusabekova
18.03.2023 07:14
// PascalABC.NET 3.1, сборка 1218 от 12.04.2016
begin
  var a:=ArrRandom(ReadInteger('n='),1,99);
  a.Println;
  var k:=ReadInteger('k=');
  Writeln('Сумма чисел, кратных ',k,': ',
    a.Where(x->x mod k=0).Sum)
end.

Тестовое решение:
n= 18
45 17 36 15 65 17 97 44 49 43 60 51 66 72 18 55 71 85
k= 12
Сумма чисел, кратных 12: 168

// PascalABC.NET 3.1, сборка 1218 от 12.04.2016
begin
  var a:=ArrRandom(ReadInteger('n='),1,20);
  a.Println;
  a.Where((x,i)->x=i+1).Println
end.

Тестовое решение:
n= 16
17 2 1 14 20 19 10 3 9 15 14 4 2 7 2 16
2 9 16
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота