Question

Кондуктор автобуса каждое утро получает билеты, для того чтобы раздать их своим пассажирам. В начале рабочего дня он запоминает номер первого билета, а в конце – последнего. Определите, сколько счастливых билетов получили пассажиры данного автобуса. PLEASE

Answer 1

PascalABC.NET 3.4.0, сборка 1672 от 10.06.2018
Внимание! Если программа не работает, обновите версию!

function IsHappy(n:integer):boolean;
begin
  var L:=new List<integer>;
  while n>0 do begin
    L.Add(n mod 10);
    n:=n div 10
    end;
  n:=L.Count;
  n:=n div 2 + n mod 2;
  Result:=L[:n].Sum=L[n:].sum
end;

begin
  var (a,b):=ReadInteger2('Введите номера первого и последнего билета:');
  Writeln('Счастливых билетов - ',Range(a,b).Where(t->IsHappy(t)).Count)
end.

Answer 2

Счастливым билетом называется билет, у которого сумма первых трех цифр номера равна сумме последних трех цифр номера.

Предположим, что номер первого билета состоит из шести цифр, а номер последнего билета также состоит из шести цифр. Тогда общее количество возможных билетов равно разности номера последнего билета и номера первого билета плюс один (так как включаем и первый, и последний билеты).

Для каждого возможного билета мы проверяем, является ли он счастливым. Для этого мы разделяем номер билета на отдельные цифры и суммируем первые три цифры и последние три цифры. Если суммы равны, то билет считается счастливым.

Вот пример кода на Python, который решает данную задачу:

pythonCopy code
def is_lucky_ticket(ticket_number):
    digits = [int(digit) for digit in str(ticket_number)]
    return sum(digits[:3]) == sum(digits[3:])

def count_lucky_tickets(first_ticket, last_ticket):
    count = 0
    for ticket in range(first_ticket, last_ticket + 1):
        if is_lucky_ticket(ticket):
            count += 1
    return count

first_ticket = 100000  # Номер первого билета
last_ticket = 999999  # Номер последнего билета

lucky_tickets = count_lucky_tickets(first_ticket, last_ticket)
print("Количество счастливых билетов:", lucky_tickets)

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