Олимпиадный тренинг

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


Задача

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

time 1000 ms
memory 32 Mb
Правила оформления программ и список ошибок при автоматической проверке задач

Статистика успешных решений по компиляторам
 Кол-во
Free Pascal58
Комментарий учителя

Ваш ответ

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.
     

Загруженные файлы
Нет