Задать вопрос Регистрация
Помочь другим

  • найти сумму двузначных положительных чисел сумма цифр которых кратно 7. (паскаль)

Ответы 1

  • Program Summa;varn,l,a: integer;m: integer;b: integer;k: integer;beginReadln(n);Readln(l);a:=n div 10;m:=l div 10;b:=n mod 10;k:=l mod 10;if (a+b) mod 7=0 then write(n,' ');if(m+k) mod 7=0 then write(n+l);End.

    Попробуй

    • Автор:

      acewk87
    • 6 лет назад
    • 0

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

Еще вопросы

Топ пользователей

Войти через Google

 или

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

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

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