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

    Пожалуйста, решите, буду очень благодарна!

    ПАСКАЛЬ, БЕЗ ВСЯКИХ СЛОЖНОСТЕЙ, НА ШКОЛЬНОМ УРОВНЕ 10 КЛАССА:)

Ответы 1

  • var i:longint;function sum(c:integer):integerbegin    sum := c mod 10 + c div 10 mod 100 + c div 100;endBegin    for i := 1 to 999999 do        if (sum(i div 1000) = sum(i mod 1000) ) then             writeln(i);End

    • Автор:

      rojas
    • 6 лет назад
    • 0
  • Добавить свой ответ

Еще вопросы

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years