Форум программистов, компьютерный форум CyberForum.ru
CyberForum.ru - форум программистов и сисадминов > >
Восстановить пароль Регистрация
 
RaTaR
Новичок
0 / 0 / 0
Регистрация: 19.04.2010
Сообщений: 11
03.06.2012, 07:35     Посчитать количество цифр в числе через оператор for   #1
Задача самая простая - сколько цифр в натуральном числе, вводимом с клавиатуры. Но вот оператор, которым необходимо это найти для меня как дремучий лес. Да и на форуме я такого решения что-то не нашел
AdAgent
Объявления
03.06.2012, 07:35    Посчитать количество цифр в числе через оператор for
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
03.06.2012, 07:35    Посчитать количество цифр в числе через оператор for

Посмотрите здесь:

Pascal ABC Дано целое положительное число. Вывести на экран сумму цифр в этом числе и количество нечетных цифр.

Turbo Pascal Определить первую цифру, сумму цифр, количество цифр в числе N

Free Pascal Определите функции: nd(n) - вычисляющую количество цифр в числе; d (n,k) - вычисляющую k цифру справа в целом числе

Turbo Pascal Строка: посчитать количество цифр в числе и сколько раз в число входит цифра 5.

Pascal ABC дано 5 чисел. посчитать количество цифр 7 в каждом числе.

Pascal ABC как посчитать количество цифр в числе?

CodeR
Фрилансер
3012 / 2516 / 151
Регистрация: 08.02.2012
Сообщений: 4,721
Записей в блоге: 1
03.06.2012, 08:32     Посчитать количество цифр в числе через оператор for   #2
Код Pascal
1
2
3
4
5
6
7
8
9
10
Var n,i:integer;
Begin
    write('Введите число: ');readln(n);
    For i:=1 to 10 do
     Begin
      n:=n div 10;
      if n=0 then break;
     End;
    writeln('В числе ',i,' цифр');
End.
RaTaR
Новичок
0 / 0 / 0
Регистрация: 19.04.2010
Сообщений: 11
03.06.2012, 13:14  [ТС]     Посчитать количество цифр в числе через оператор for   #3
Спасибо за ответ, но у меня вопрос For i:=1 to 10 do если поставить значение здесь занчение не 10, а, например, 20, то программа перестаёт работать. Почему?
Puporev
Модератор
43085 / 31456 / 2103
Регистрация: 18.05.2008
Сообщений: 67,307
03.06.2012, 15:24     Посчитать количество цифр в числе через оператор for   #4
Ничего не перестает, хоть
i:=1 to 1000 do
break прерывает цикл как только кончаются цифры
Миниатюры
Посчитать количество цифр в числе через оператор for  
RaTaR
Новичок
0 / 0 / 0
Регистрация: 19.04.2010
Сообщений: 11
03.06.2012, 15:41  [ТС]     Посчитать количество цифр в числе через оператор for   #5
Это я понял, но введи больше 10 цифр и увидишь, у меня по крайней мере так, что если ввожу больше 10 цифр выдаёт ошибку на 3 строке.
AdAgent
Объявления
03.06.2012, 15:41    Посчитать количество цифр в числе через оператор for
Puporev
Модератор
43085 / 31456 / 2103
Регистрация: 18.05.2008
Сообщений: 67,307
03.06.2012, 16:06     Посчитать количество цифр в числе через оператор for   #6
RaTaR, Так нужно знать что наибольшее число типа integer в Турбо Паскале=32767, в других Паскалях= Longint=2147483647или не более 10 цифр.
А вообще Вы писали не про это, а
Цитата Сообщение от RaTaR Посмотреть сообщение
For i:=1 to 10 do если поставить значение здесь занчение не 10, а, например, 20, то программа перестаёт работать.
Мозг иногда использовать нужно, хотя.....
RaTaR
Новичок
0 / 0 / 0
Регистрация: 19.04.2010
Сообщений: 11
03.06.2012, 16:25  [ТС]     Посчитать количество цифр в числе через оператор for   #7
Спасибо за ответ, но не нужно оскорбления про мозг в мой адрес предъявлять, я пока что только учусь в колледже и вот изучаю паскаль лабы на while и repeat написал без пробелем, а вот на for такая проблема возникала.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
03.06.2012, 16:42    Посчитать количество цифр в числе через оператор for

Еще ссылки по теме:

Pascal ABC Есть ли в заданном числе (количество цифр в числе заранее не известно) хотя бы одна цифра, кратная трём?

Pascal ABC Ввести два числа. Найти количество цифр в двух числах, используя функцию вычисления количества цифр в одном числе

Pascal Изменяя число i от 1 до n (без пробелов) получить число. Посчитать в нем количество каждых цифр. Посчитать общее число цифр

Turbo Pascal Количество цифр в числе

Puporev
Модератор
43085 / 31456 / 2103
Регистрация: 18.05.2008
Сообщений: 67,307
03.06.2012, 16:42     Посчитать количество цифр в числе через оператор for   #8
При чем здесь цикл, если Вы не умеете правильно описать проблему, а также не знаете элементарных вещей, как стандартные типы, которые описаны в первых страницах любого учебника.

Добавлено через 36 секунд
Цитата Сообщение от RaTaR Посмотреть сообщение
но не нужно оскорбления про мозг в мой адрес
Вышел на паперть, терпи...
Yandex
Объявления
03.06.2012, 16:42    Посчитать количество цифр в числе через оператор for
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
Ответ Создать новую тему
Опции темы

Текущее время: 06:52. Часовой пояс GMT +4.
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.7 PL3
Copyright ©2000 - 2014, vBulletin Solutions, Inc.