• Написать программу, которая будет определять сколько чисел делиться на 3 без остатка на диапозоне от n до k ​

Ответы 6

  • count - количество чисел
    • Автор:

      stevemkdh
    • 5 лет назад
    • 0
  • Спасибо
    • Автор:

      chrissy
    • 5 лет назад
    • 0
  • Известно, что "счастливый билет" в городском транспорте - это билет где сумма первых трёх и последних трёх цифр совпадает. Реализовать алгоритм, который позволяет по введенному номеру билета, определить - счастливый он или нет.Пример:Ввод: 026008 Вывод: счастливыйВвод: 126125 Вывод: несчастливый
    • Автор:

      landon195
    • 5 лет назад
    • 0
  • Получилось что-то из того, что я выложила?
  • var num: integer;begin read(num); if((num div 100000 + num div 10000 mod 10 + num div 1000 mod 10) = (num div 100 mod 10 + num div 10 mod 10 + num mod 10)) then write('счастливый') else write('несчастливый');end.
  • var

     sum, n, k, i: integer;

    begin

     sum := 0;

     write('Введите n и k:');

     read(n, k);

     for i := n to k do

       if(i mod 3 = 0) then

         sum := sum + 1;

     write(sum);

    end.

  • Добавить свой ответ

Еще вопросы

Войти через Google

или

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

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

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