Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.80/40: Рейтинг темы: голосов - 40, средняя оценка - 4.80
1 / 1 / 0
Регистрация: 18.03.2020
Сообщений: 81

Количество чисел до и после запятой

13.09.2020, 18:09. Показов 8205. Ответов 5
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
я практикуюсь , ну пытаюсь хоть что-то делать что бы понимать как что делается в паскале (в частности с процедурами самое сложное для меня) и вот вопрос я вроде знаю что можно ограничивать количество символов после и до запятой в числе это выглядит же так (x:3:3)к примеру, только вроде когда 2а (':') стоят это обозначается сначала до запятой а потом после? вроде так. а когда стоит только 1н(':') то только после запятой. вот и у меня тут выходит что когда я оставляю только 1н знак (':') то он все равно выводит всю дробную часть. м.б. я что-то не так делаю или не правильно понял? если да то объясните пж-а, заранее спасибо.

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
program trenProc;
var
  n,h,s,p:real;
procedure traingle(a:real;var P,S,H:real);
  begin
    P:=a*3;
    H:=(a*sqrt(3))/2;
    S:=(1/2)*a*H;
  end;
  begin
    write('введите длину стороны РАВНОСТОРОННЕГО треугольника= ');
    read(n);
    traingle(n,p,s,h);
    write('высота у этого треугольника h=(',h:3:3,') периметр р=(',p:3:1,')  площадь h=(',h:3:2,')');
 
  end.
0
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
13.09.2020, 18:09
Ответы с готовыми решениями:

Подсчет количество чисел после запятой или умножение десятичной до целых
Вот есть один вопрос как делается Подсчет чисел после запятой или умножение десятичной до целых То есть более подробнее Есть число...

Количество чисел после запятой
Народ, столкнулся с проблемой! нужно сделать что бы после запятой было 2 числа! пробовал и toFixed и s=Math.round(s*100)/100;, ничего не...

Как ограничить количество вводимых знаков в Edit после запятой, не ограничивая количество до запятой?
Доброго времени суток! Подскажите как реализовать так, чтобы после ввода в поле Edit запятой, ограничивалось количество введенных...

5
Почетный модератор
 Аватар для Puporev
64315 / 47611 / 32743
Регистрация: 18.05.2008
Сообщений: 115,167
13.09.2020, 19:23
Цитата Сообщение от AlexeyNo Посмотреть сообщение
когда я оставляю только 1н знак (':') то он все равно выводит всю дробную часть.
Один знак : ставят для вывода целых чисел.
Pascal
1
2
3
4
var a:integer;
.................................
a:=a*a;
write('a=',a:6);
0
1 / 1 / 0
Регистрация: 18.03.2020
Сообщений: 81
13.09.2020, 20:08  [ТС]
а как можно сделать его безграничным, в том смысле что если бы я не знал сколько может получиться в ответе, а поставлю, допустим, те же a:6 то выходит, что если бы у меня получилось число больше чем на 6 символов оно урежется?
0
Почетный модератор
 Аватар для Puporev
64315 / 47611 / 32743
Регистрация: 18.05.2008
Сообщений: 115,167
13.09.2020, 20:14
Цитата Сообщение от AlexeyNo Посмотреть сообщение
оно урежется?
Нет. Если выделим количество позиций под число меньше или равно количеству разрядов, то просто выведет само число, а если больше, то перед числом будут пробелы.
Вообще сами поэкспериментируйте и поймете.
1
1 / 1 / 0
Регистрация: 18.03.2020
Сообщений: 81
13.09.2020, 20:42  [ТС]
понял, спасибо
0
Модератор
10429 / 5717 / 3404
Регистрация: 17.08.2012
Сообщений: 17,385
15.09.2020, 00:07
На самом деле, всё не совсем так. Вернее, совсем не так. Puporev всё слишком упростил, должно быть, из-за Вашей лени самостоятельно найти и изучить паскалевский форматированный вывод.

Это не совсем верно, что одно двоеточие - для целых чисел. Одно двоеточие используется для форматированного вывода чуть ли не чего угодно, в том числе, и для вывода вещественных и комплексных чисел.

Формат с одним двоеточием (:n) используется для вывода целых чисел, символов, строк и логических значений, а также вещественных и комплексных чисел в научной нотации (в экспоненциальном форме), в заданное число позиций. Если после двоеточия указано недостаточное для вывода количество позиций, например, :0, то форматируемое значение будет выведено в минимально возможное количество позиций, при этом целые числа, символы, строки и логические значения будут выведены полностью. Вещественные числа, а также действительные и мнимые части комплексных чисел, будут выведены в научной нотации с округлением (усечением) мантиссы до длины, при котором запись числа в указанное количество позиций ещё возможна, но не менее, чем до двух значащих цифр.

Формат с двумя двоеточиями (:n:m) используется для вывода вещественных и комплексных чисел в обычной нотации (в формате с плавающей точкой). Число после первого двоеточия означает общее количество позиций для вывода, включая знак числа, десятичную точку, целую и дробную части числа. Число после второго двоеточия означает количество цифр после десятичной точки (количество цифр в дробной части числа). Если указано число позиций, недостаточное для вывода числа, то целая часть числа будет выведена в минимально возможное количество позиций, а дробная часть числа будет выведена (возможно, с округлением) в количество позиций, указанное после второго двоеточия.

Для формата с двумя двоеточиями есть некоторое ограничение, заданное средой Pascal ABC. Это относится как к вещественным числам, так и к действительным и мнимым частям комплексных чисел. При их величине где-то более 1017 значения выводятся не в обычной, а в научной нотации, причём, возможно, ещё и без дробной части в мантиссе, возможно, даже в том случае, если значение помещается в указанный (Вами) формат. На эту, так сказать, "особенность", влияет не только величина самого числа, но и его округление при преобразовании в указанный (Вами) формат вывода, а также усечение и / или округление числа при его преобразовании в машинный (двоичный) формат. Поэтому при каких именно значениях более 1017 этот казус происходит, выяснять даже смысла не имеет.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
15.09.2020, 00:07
Помогаю со студенческими работами здесь

Поле Number, количество чисел после запятой
Есть поле Number На второй закладке : Number Format: Decimal Decimal Places: 2 Varying - галочки нет Т.е. насколько я понимаю,...

Как ограничить количество знаков после запятой, не ограничивая количество до запятой?
Как ограничить количество знаков после запятой, не ограничивая количество до запятой? Если, к примеру, записать так...

В строке имеется одна точка с запятой. Подсчитать количество символов до точки с запятой и после неё
В строке имеется одна точка с запятой. Подсчитать количество символов до точки с запятой и после неё. Заранее большое спасибо!

В строке имеется одна точка с запятой (;). Подсчитать количество символов до точки с запятой и после нее.
В строке имеется одна точка с запятой ( ; ). Подсчитать количество символов до точки с запятой и после нее.

Сохранить количество знаков после запятой после конвертации из строки в double
Всем привет. У меня такой вопрос, может даже глупый немного. У меня в ячейке datagridview значение типа string вида "0.0000" ...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
6
Ответ Создать тему
Новые блоги и статьи
Конвертировать закладки radiotray-ng в m3u-плейлист
damix 19.02.2026
Это можно сделать скриптом для PowerShell. Использование . \СonvertRadiotrayToM3U. ps1 <path_to_bookmarks. json> Рядом с файлом bookmarks. json появится файл bookmarks. m3u с результатом. # Check if. . .
Семь CDC на одном интерфейсе: 5 U[S]ARTов, 1 CAN и 1 SSI
Eddy_Em 18.02.2026
Постепенно допиливаю свою "многоинтерфейсную плату". Выглядит вот так: https:/ / www. cyberforum. ru/ blog_attachment. php?attachmentid=11617&stc=1&d=1771445347 Основана на STM32F303RBT6. На борту пять. . .
Камера Toupcam IUA500KMA
Eddy_Em 12.02.2026
Т. к. у всяких "хикроботов" слишком уж мелкий пиксель, для подсмотра в ESPriF они вообще плохо годятся: уже 14 величину можно рассмотреть еле-еле лишь на экспозициях под 3 секунды (а то и больше),. . .
И ясному Солнцу
zbw 12.02.2026
И ясному Солнцу, и светлой Луне. В мире покоя нет и люди не могут жить в тишине. А жить им немного лет.
«Знание-Сила»
zbw 12.02.2026
«Знание-Сила» «Время-Деньги» «Деньги -Пуля»
SDL3 для Web (WebAssembly): Подключение Box2D v3, физика и отрисовка коллайдеров
8Observer8 12.02.2026
Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами и вызывать обработчики событий столкновения. . . .
SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL_LoadPNG (без SDL3_image)
8Observer8 11.02.2026
Содержание блога Библиотека SDL3 содержит встроенные инструменты для базовой работы с изображениями - без использования библиотеки SDL3_image. Пошагово создадим проект для загрузки изображения. . .
SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL3_image
8Observer8 10.02.2026
Содержание блога Библиотека SDL3_image содержит инструменты для расширенной работы с изображениями. Пошагово создадим проект для загрузки изображения формата PNG с альфа-каналом (с прозрачным. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru