Просмотр задания
![]() |
Укажите количество двузначных натуральных чисел, при вводе которых приведенная ниже программа напечатает число, отличное от 0.
var i, n: longint; begin i := 0; readln(n); while (n > 0) do begin i := i + n mod 9; n := n div 9; end; writeln(i mod 8); end. Впервые вижу такой вид задания, нигде не видел разборов на него, надеюсь вы поможете Савелий, https://vk.com/3yxpaaa 18 мая 2018
|
Ответы (3)
# 19 мая 2018 в 01:24 +1 |