В результате выполнения фрагмента программы: While n<>0 do begin Write (2 * (n mod 10) + 1); n: = n div 10; end; На экран выведено число 13717 Какое число хранилось до этого в переменной n? 1) 716 2) 638 3) 386 4) 836

Число будет составным (в цикле Write, а не Writeln).

При первом прохождении цикла для всех вариантов Write (2 * (n mod 10) + 1) и n: = n div 10 приведут к выводу числа и изменению значения n:

1) 716, 2 * 6 + 1 = 13, n = 71;

2) 638, 2 * 8 + 1 = 17, n = 63;

3) 386, 2 * 6 + 1 = 13, n = 38;

4) 836, 2 * 6 + 1 = 13, n = 83.

Вариант 2) дальше не рассматриваем.

При втором прохождении цикла:

1) 71, 2 * 1 + 1 = 3, n = 7;

3) 38, 2 * 8 + 1 = 17, n = 3;

4) 83, 2 * 3 + 1 = 7, n = 8.

Варианты 1) и 3) отбрасываем.

Проверяем, получится ли в варианте 4) число 17.

4) 8, 2 * 8 + 1 = 17, n = 0 (цикл останавливаеся).

Ответ: 4) 836.