Форум программистов и сисадминов CyberForum.ru
Вернуться   Форум программистов и сисадминов CyberForum.ru > Форум Форум программистов > Форум Pascal (Паскаль)
Восстановить пароль Регистрация

Ответ Создать новую тему
 
Старый 03.06.2012, 07:35   #1
RaTaR
Новичок
 
Регистрация: 19.04.2010
Сообщений: 8
Репутация: 0 (0)
Посчитать количество цифр в числе через оператор for / Pascal (Паскаль)

Задача самая простая - сколько цифр в натуральном числе, вводимом с клавиатуры. Но вот оператор, которым необходимо это найти для меня как дремучий лес. Да и на форуме я такого решения что-то не нашел
Старый 03.06.2012, 08:32   #2
CodeR
Фрилансер
 
Аватар для CodeR
 
Регистрация: 08.02.2012
Сообщений: 4,335
Репутация: 2847 (2346)
Записей в блоге: 1
Лучшие ответы: 57
Посчитать количество цифр в числе через оператор for

Код 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.
Другие темы раздела Форум программистов Pascal. Программирование с использованием языка Pascal (Паскаль). Помощь студентам и школьникам в решении задач.
Pascal Дана последовательность. Найти сумму чисел последовательности до первого положительного
3. Дана последовательность n*3-{8}^{2}, где n меняется от 1 до 10. Найти сумму чисел последовательности до первого положительного. Элементы и номера последовательности вывести в табличном виде. Спасибо большое! А как сделать, чтобы элементы и номера последовательности были выведены в табличном...
Pascal Протабулировать функцию. Найти первое значение функции больше а
2. Протабулировать функцию y={x}^{2}+2x-8.. Найти первое значение функции больше {a}^{}. Помогите, пожалуйста. Кто понимает.:-| кто-нибудь знает?
Старый 03.06.2012, 13:14  [ТС]   #3
RaTaR
Новичок
 
Регистрация: 19.04.2010
Сообщений: 8
Репутация: 0 (0)
Посчитать количество цифр в числе через оператор for

Спасибо за ответ, но у меня вопрос For i:=1 to 10 do если поставить значение здесь занчение не 10, а, например, 20, то программа перестаёт работать. Почему?
Старый 03.06.2012, 15:24   #4
Puporev
Модератор
 
Аватар для Puporev
 
Регистрация: 18.05.2008
Сообщений: 62,277
Репутация: 40945 (29492)
Лучшие ответы: 1172
Посчитать количество цифр в числе через оператор for

Ничего не перестает, хоть
i:=1 to 1000 do
break прерывает цикл как только кончаются цифры
Миниатюры
Посчитать количество цифр в числе через оператор for  
Старый 03.06.2012, 15:24
Google
Объявления
Старый 03.06.2012, 15:41  [ТС]   #5
RaTaR
Новичок
 
Регистрация: 19.04.2010
Сообщений: 8
Репутация: 0 (0)
Посчитать количество цифр в числе через оператор for

Это я понял, но введи больше 10 цифр и увидишь, у меня по крайней мере так, что если ввожу больше 10 цифр выдаёт ошибку на 3 строке.
Старый 03.06.2012, 16:06   #6
Puporev
Модератор
 
Аватар для Puporev
 
Регистрация: 18.05.2008
Сообщений: 62,277
Репутация: 40945 (29492)
Лучшие ответы: 1172
Посчитать количество цифр в числе через оператор for

RaTaR, Так нужно знать что наибольшее число типа integer в Турбо Паскале=32767, в других Паскалях= Longint=2147483647или не более 10 цифр.
А вообще Вы писали не про это, а
Цитата Сообщение от RaTaR Посмотреть сообщение
For i:=1 to 10 do если поставить значение здесь занчение не 10, а, например, 20, то программа перестаёт работать.
Мозг иногда использовать нужно, хотя.....
Старый 03.06.2012, 16:25  [ТС]   #7
RaTaR
Новичок
 
Регистрация: 19.04.2010
Сообщений: 8
Репутация: 0 (0)
Посчитать количество цифр в числе через оператор for

Спасибо за ответ, но не нужно оскорбления про мозг в мой адрес предъявлять, я пока что только учусь в колледже и вот изучаю паскаль лабы на while и repeat написал без пробелем, а вот на for такая проблема возникала.
Старый 03.06.2012, 16:42   #8
Puporev
Модератор
 
Аватар для Puporev
 
Регистрация: 18.05.2008
Сообщений: 62,277
Репутация: 40945 (29492)
Лучшие ответы: 1172
Посчитать количество цифр в числе через оператор for / Pascal (Паскаль)

При чем здесь цикл, если Вы не умеете правильно описать проблему, а также не знаете элементарных вещей, как стандартные типы, которые описаны в первых страницах любого учебника.

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

Похожие темы
Тема Автор
C# .NET Посчитать количество цифр в числе,очень нужна помощь
Помогите не могу никак разобратся! нужно сщздать прогу. Пользователь вводит с клавиатуры число - программа должна показать сколько в данном числе цифр. Число вводится целиком в одну переменную. скрины здесь Спамеры и рекламщики здесь не задерживаются... Еще одна такая выходка и Вы...
Alex12345647
Turbo Pascal Определить первую цифру, сумму цифр, количество цифр в числе N
Дано натуральное число n. Определить: а) Первую цифру числа N. б) сумму цифр числа N. в) кол-во цифр в числе N.
dmitriy2012
Delphi для начинающих Посчитать количество цифр в десятичном числе
Написать программу, подсчитывающую количество различных цифр в десятичной записи натурального числа n. Помогите пожалуйста решить задачу!
Жансая
С++ для начинающих нужно посчитать количество цифр 4 и 9 в данном числе
например, чтобы при вводе числа 14599 программа выдавала 3 помогите пожалуйста
edj
С++ для начинающих как посчитать количество повторений каждой из цифр в числе N*N
я очень плохо ориентируюсь на С++.Такой вопрос:можно числа переводить в строки?И если нет,то как осуществить решение задачи?Помогите, пожалуйста
Stryagina
Опции темы

Текущее время: 20:10. Часовой пояс GMT +4.

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.7 PL3
Copyright ©2000 - 2014, vBulletin Solutions, Inc.