• Помогите!!!!Написать программу, которая определяет кратна ли числу А сумма цифр двухзначного числа

Ответы 2

  • Блин что за муть как сложно,думаю как решить )
    • Автор:

      booker
    • 6 лет назад
    • 0
  • var a,a1,a2,a3:integer; 

    begin 

    read(a); - читаем данное число

    a1:=a mod 10; 

    a2:=a div 10;

    a3:=a1+a2;

    if a3 mod = 0 then write('да')

                             else(write('нет');  

    end.

     

     

     

     

     

     

     

     

     

     

     

     

     

     

     

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

Войти через Google

или

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

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

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