Модуль: Pascal. Оператор цикла с условием - while


8. Цифры числа - 3 - исправляем программу

Попробуем исправить предыдущую задачу. 
Для этого необходимо сохранить исходное число еще в какой-либо переменной, например в n1. 
В этом случае исходное значение не потеряется и в выводе мы сможем вывести сохраненное значение.
Чтобы это выполнить сделайте следующее:
1. В 1-й строке объявите переменную n1
2. В 4-й строке сохрание в переменной n1 значение переменной n
3. В операторе вывода в 10-й строке замените вывод значения переменной n на вывод значения переменной n1
4. Запустите программу, посмотрите результат ее работы

Вставьте недостающие фрагменты кода
Pascal
1
2
begin 
3
    read(n); 
4
5
    count := 0; 
6
    while n <> 0 do begin 
7
        count += 1; 
8
        n := n div 10; 
9
    end; 
10
11
end.