• 1. Сколько существует 5-значных чисел, у которых сумма цифр равна 7?
    Число не может начинаться с нуля.
    нужно подробное решение. дам больше баллов
    .

Ответы 1

  • var i,n,sum,j:integer; m:string;beginfor i:=10000 to 99999 do beginm :=inttostr(i);for j:=1 to 5 dosum:= sum + strtoint(m[j]);if sum = 7 thenwrite(i:6);sum:=0;end;end.
    • Автор:

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

Еще вопросы

Войти через Google

или

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

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

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