• С клавиатуры введено произвольное трехзначное число (например 415). Определить,сколько в нём сотен,десятков,едениц. ПОЖАЛУЙСТА!!!

Ответы 1

  • program abc;varn:integer;beginWrite('Введите трёхзначное число: ');readln(n);Writeln('В данном числе: ',n div 100,' сотен(-я), ',(n div 10) mod 10,' десятков(-ок, -а), ', n mod 10, ' единиц(-а).');end.
    • Автор:

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

Войти через Google

или

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

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

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