• Определить, является ли трамвайный билет счастливым? Счастливым будем считать такое число из шести цифр, в котором сумма левых трех цифр равна сумме правых трех цифр. паскаль

Ответы 6

  • спасибо, но мне удалось сделать без див и мод
  • спасибо, но мне удалось сделать без див и мод
    • Автор:

      enzoq9uk
    • 6 лет назад
    • 0
  • В условии задачи нет требования не использовать div и mod.
  • я вкурсе. просто не понимаю ка ими пользоваться. прсто констатировал факт, что сумел
  • var n,n1,n2,s1,s2:integer;beginwrite('n = '); readln(n);n1:=n div 1000;n2:=n mod 1000;s1:=n1 div 100+(n1 div 10 mod 10)+n1 mod 10;s2:=n2 div 100+(n2 div 10 mod 10)+n2 mod 10;if s1=s2 then writeln('Билет счастливый') else writeln('Билет не счастливый');end.Пример 1:n = 156309Билет счастливыйПример 2:n = 762453Билет не счастливый
    • Автор:

      bubbles
    • 6 лет назад
    • 0
  • program lucky;varn,l,r: integer;beginwriteln('введите номер билета');readln(n);l := (n div 100000) + (n mod 100000 div 10000) + (n mod 100000 mod 10000 div 1000);r := (n mod 100000 mod 10000 mod 1000 div 100) +(n mod 100000 mod 10000 mod 1000 mod 100 div 10) + (n mod 100000 mod 10000 mod 1000 mod 100 mod 10);if l == r thenwriteln('ваш билет счастливый')elsewriteln('ваш билет не счастливый');end.
  • Добавить свой ответ

Еще вопросы

Войти через Google

или

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

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

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