• С клавиатуры вводится двузначное число a. Найти сумму его цифр.

Ответы 1

  • var a,a1,a2,sum:integer;

    begin

    readln(a);

    sum:=0;

    a1:=a mod 10;

    a2:=a div 10;

    sum:=a1+a2;

    writeln(sum);

    end. 

     

     

    • Автор:

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

Войти через Google

или

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

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

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