Имя: Пароль:
1C
1С v8
Как вывести цену без копеек?
,
0 tabarigen
 
30.06.17
17:11
Сейчас цена выводится с копейками. Пример 179 руб 65 к.
А нужно так 179,65 руб.

Код такой.

Обл.Параметры.ЦенаСтрокой = "" + Цел(Стр.ЦенаРозн) +"руб " +?(СтрДлина(СтрЗаменить(Остаток,"0,","")) = 1,СтрЗаменить(Остаток,"0,","") + "0",СтрЗаменить(Остаток,"0,","")) +"к";
1 zak555
 
30.06.17
17:12
Обл.Параметры.ЦенаСтрокой = Стр.ЦенаРозн + " " + валюта;
2 PiterPrg
 
30.06.17
17:13
Так что-ли?

Обл.Параметры.ЦенаСтрокой = "" + Стр.ЦенаРозн +" руб";
3 Лефмихалыч
 
30.06.17
17:30
(2) нет, вот так
Обл.Параметры.ЦенаСтрокой = "" + Цел(Стр.ЦенаРозн) +"," +?(СтрДлина(СтрЗаменить(Остаток,"0,","")) = 1,СтрЗаменить(Остаток,"0,","") + "0",СтрЗаменить(Остаток,"0,","")) +" руб";
4 Лефмихалыч
 
30.06.17
17:30
вообще - это просто гениальный способ вывода цены БЕЗ КОПЕЕК
5 vicof
 
30.06.17
17:54
Спасибо, поржал
6 Tatitutu
 
30.06.17
17:58
(5)+1005000
но...есть одно , но
согласно заданию в (0)
(2) и (3) ответ неверный (почти..., но нет)
7 tabarigen
 
30.06.17
19:29
(4) я проводил опрос среди клиентов 100 из 100 ответили что им ясно, что в числе 179,69  -- 69 это копейки. Если бы попался хотя бы один такой как ты я бы отказался от этой затеи.
8 Cyberhawk
 
30.06.17
19:34
"в числе 179,69  -- 69 это копейки" // Вообще-то "69" - это дробная часть. Ну или еще кое-чего.
Рекомендую пройти тест: https://naked-science.ru/flash/test.html
О результате отпишись :)
9 Fram
 
30.06.17
19:59
(8) ты задрал всех своими тестами )
10 Fram
 
30.06.17
20:01
В данном случае и без тестов все понятно, по моему
11 Cyberhawk
 
30.06.17
20:02
(9) А ты проходил? :D
12 tabarigen
 
30.06.17
20:06
(8) ссорян, не так, быстро прочел сообщение (4) и не прочел предыдущее.

Тест прошел. Результат 20 очков =(

20-25 очков:
У вас хорошо развито логическое мышление. Однако вы можете делать ошибки в нестандартных или запутанных случаях. Получив какой-нибудь вывод в результате рассуждения, не торопитесь принимать его за истину. Возьмите за правило перепроверять свои выводы, искать в них ошибки и просто слабые места. Не удивляйтесь, не возмущайтесь, если вас поправляют: возможно, за дело.
13 tabarigen
 
30.06.17
20:07
(10) поделитесь пожалуйста Вашим выводом. с радостью восприму критику.
14 tabarigen
 
30.06.17
20:10
(1) предполагается что если цена будет целым числом, дробную часть не выводить
15 Fram
 
30.06.17
20:42
(13) ты серьезно сам не можешь сделать задачу (если ее можно вообще так назвать) из (0)?
16 tabarigen
 
30.06.17
20:58
(15) на ту секунду когда писал, лень было отладчик запускать.
17 Fram
 
30.06.17
21:01
(16) а нафига там отладчик?
18 tabarigen
 
30.06.17
21:03
(17) я к 1с имею опосредственное отношение. Прям так по памяти не смогу написать.
19 Fram
 
30.06.17
21:04
(16) а на мисту закинуть такой вопрос не лень. первая мысль, которая возникла у меня, например, это мол опять какой то пользователь программировать пытается.
20 tabarigen
 
30.06.17
21:08
(19) В общем я понял Вас. Завтра решение скину сюда, зацените.
21 Fram
 
30.06.17
21:10
(20) какое решение? в (3) уже все сделали за тебя. заменили "руб " на запятую и "к" на "руб"
22 tabarigen
 
30.06.17
21:11
(21) окей гугл. забыл добавить что в случае целого числа дробную часть желательно отбрасывать.
23 Fram
 
30.06.17
21:13
(22) а вот этот кусок по твоему что делает?
?(СтрДлина(СтрЗаменить(Остаток,"0,","")) = 1,СтрЗаменить(Остаток,"0,","") + "0",СтрЗаменить(Остаток,"0,",""))
24 tabarigen
 
30.06.17
21:17
(21) удаляет нули.
но то что в (3) не совсем то. Ибо там запятая всегда выводится
25 Fram
 
30.06.17
21:20
(24) а ну это суперсложная задача! решай
26 Fram
 
30.06.17
21:21
(3) shame on you, Лефмихалыч )))
27 vadim777
 
30.06.17
21:45
(12) 28
28 tabarigen
 
30.06.17
22:09
(26) спасибо за поддержку
Закон Брукера: Даже маленькая практика стоит большой теории.