• 2. Определить количество трёхзначных цифр, сумма цифр которого равна заданному числу N (в паскале, Цикл со счётчиком)

Ответы 1

  • program asd;var x,k,n:integer;beginreadln (n);for x:=100 to 999 do beginif (x div 100 + x div 10 mod 10 + x mod 10 = n) thenk:=k+1;end;writeln (k);readln;end.

    • Автор:

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

Войти через Google

или

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

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

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