• Задача: Дано 2-х значное число, определить является ли сумма его цифр 2-х значным числом. Вопрос: Как решить эту задачу в программе Free Pascal???

Ответы 1

  • //Pascalvar N: byte;begin  write('Введите 2-значное число: '); readln(N);  if (N mod 10 + N div 10) >= 10 then    writeln('Сумма цифр 2-значная = ', N mod 10 + N div 10)  else    writeln('Сумма цифр не 2-значная = ', N mod 10 + N div 10);  readln;end.Пример:Введите 2-значное число: 86Сумма цифр 2-значная = 14---------------------------------------------Введите 2-значное число: 54Сумма цифр не 2-значная = 9
    • Автор:

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

Еще вопросы

Войти через Google

или

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

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

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