Re: Компьютерное железо и софт. Интернет.
автор Буливер Пт 10 Мар 2017, 13:46
Ты не пугайся так, просто зверюге доверили принятие стратегического решения; считать ракеты с права на лево или с дева на право.GAUSS пишет:[tmb]http://hitgid.com/images/испуганный-кот-1.jpg [/tmb]Zveruga пишет: Решал проблему учёта ядерных ракет
Буливер- Бывалый
- Сообщения : 11823
-
Re: Компьютерное железо и софт. Интернет.
автор Zveruga Пт 10 Мар 2017, 13:47
Для меня в то время это было как откровение. Я тогда понял, что весь мир управляется деньгами. Что юридически армия это организация оказывающая услуги безопасности государству за деньги. Сухим юридическим языком это выглядит именно так.GAUSS пишет:[tmb]http://hitgid.com/images/испуганный-кот-1.jpg [/tmb]Zveruga пишет: Решал проблему учёта ядерных ракет
Всё имеет подсчёт и учёт, в том числе и ядерные ракеты.
Последний раз редактировалось: Zveruga (Пт 10 Мар 2017, 13:49), всего редактировалось 2 раз(а)
Zveruga- Сообщения : 10901
Возраст : 44
Откуда : из леса
-
GAUSS- Хомо Нытикус
- Сообщения : 75388
Возраст : 40
Откуда : Новомайдановск
-
Re: Компьютерное железо и софт. Интернет.
автор Racoon Пт 10 Мар 2017, 13:49
Да. это таблица часть кода. И я на нее убил достаточно времениsabaca пишет:У меня примерно так... неделю думаешь один день пишешь. А твой пример это, фактически, не код... это данные.
Мне неделю думать никто не позволит, результат должен быть виден сразу, даже если он будет потом неоднократно корректироваться и переписываться почти с нуля по мере появления новых светлых идей. Специфика работы
Racoon- Сообщения : 76688
Откуда : Море Спокойствия
-
Re: Компьютерное железо и софт. Интернет.
автор Zveruga Пт 10 Мар 2017, 13:51
А зачем? Описание ядерной ракеты в БД выглядит так.GAUSS пишет:а ты подписку давал?
Инвентарный номер 95300350943855.
Стоимость 2023084.
Амортизация 826876.
Срок полезного использования ххх.
Наверное только последнее имеет секретность.
Zveruga- Сообщения : 10901
Возраст : 44
Откуда : из леса
-
Re: Компьютерное железо и софт. Интернет.
автор Racoon Пт 10 Мар 2017, 13:53
Racoon- Сообщения : 76688
Откуда : Море Спокойствия
-
Re: Компьютерное железо и софт. Интернет.
автор GAUSS Пт 10 Мар 2017, 15:19
зачем?Racoon пишет:Я потом перепишу кусок Зверюгиной программы
GAUSS- Хомо Нытикус
- Сообщения : 75388
Возраст : 40
Откуда : Новомайдановск
-
Re: Компьютерное железо и софт. Интернет.
автор Racoon Пт 10 Мар 2017, 15:39
Racoon- Сообщения : 76688
Откуда : Море Спокойствия
-
Re: Компьютерное железо и софт. Интернет.
автор GAUSS Пт 10 Мар 2017, 15:42
кому?Racoon пишет:показать
GAUSS- Хомо Нытикус
- Сообщения : 75388
Возраст : 40
Откуда : Новомайдановск
-
Re: Компьютерное железо и софт. Интернет.
автор Racoon Пт 10 Мар 2017, 15:50
тебе и твоей сабакеGAUSS пишет:кому?
Racoon- Сообщения : 76688
Откуда : Море Спокойствия
-
Re: Компьютерное железо и софт. Интернет.
автор Линейцев Дмитрий Пт 10 Мар 2017, 16:38
Линейцев Дмитрий- КотоФлот - умеренный нытик
- Сообщения : 30351
Возраст : 57
Откуда : Столица Империи
-
Re: Компьютерное железо и софт. Интернет.
автор Racoon Пт 10 Мар 2017, 17:29
- Код:
Процедура Сформировать()
// Проверим на ошибки
Если КонДата > КонецРассчитанногоПериодаБИ() Тогда
Предупреждение("Дата отчёта выходит за пределы рассчитанного периода бухгалтерских итогов.");
Возврат;
КонецЕсли;
ЕстьВыбранныйВидЛесоматериала = 0;
Для А=1 По ВыбВидыЛесоматериалов.РазмерСписка() Цикл
Если ВыбВидыЛесоматериалов.Пометка(А) = 1 Тогда
ЕстьВыбранныйВидЛесоматериала = 1;
Прервать;
КонецЕсли;
КонецЦикла;
Если ЕстьВыбранныйВидЛесоматериала = 0 Тогда
Предупреждение("Необходимо выбрать хотя бы один вид лесоматериала.");
Возврат;
КонецЕсли;
// Заполним начальные параметры
ВидыСортов = СоздатьОбъект("СписокЗначений");
Для А=1 По ВыбСорта.РазмерСписка() Цикл
Если ВыбСорта.Пометка(А) = 1 Тогда
Представление = "";
Сорт = ВыбСорта.ПолучитьЗначение(А, Представление);
Если Сорт = Перечисление.Сорт.ПервыйВторой Тогда
Представление = "12С";
ИначеЕсли Сорт = Перечисление.Сорт.ПервыйТретий Тогда
Представление = "13С";
ИначеЕсли Сорт = Перечисление.Сорт.Третий Тогда
Представление = "3С";
ИначеЕсли Сорт = Перечисление.Сорт.ТретийЧетвёртый Тогда
Представление = "34С";
ИначеЕсли Сорт = Перечисление.Сорт.БезСорта Тогда
Представление = "0С";
ИначеЕсли Сорт = Перечисление.Сорт.Пятый Тогда
Представление = "5С";
КонецЕсли;
ВидыСортов.ДобавитьЗначение(Сорт, Представление);
КонецЕсли;
КонецЦикла;
ВидыДлин = ПолучитьСписокВидов(ВыбДлины);
ВидыВлажности = ПолучитьСписокВидов(ВыбВлажность);
ВидыДиаметров = ПолучитьСписокВидов(ВыбДиаметры);
ВидыТолщинШирин = ПолучитьСписокВидов(ВыбТолщинаШирина);
ВидыЛесоматериалов = ПолучитьСписокВидов(ВыбВидыЛесоматериалов);
ВыбСклады.Выгрузить(МестаХранения);
- Код:
void CreateReport()
{
// check errors
if (FinishDate > EndOfCalcedPeriodBI())
{
ShowMsg("Дата отчёта выходит за пределы рассчитанного периода бухгалтерских итогов.");
return;
}
bool bWoodSelected = false;
for (int i = 0; i < SelectedWoodTypes.size(); i++)
if (bWoodSelected = mSelectedWoodTypes[A].mark == 1)
break;
if (!bWoodSelected )
{
ShowMsg("Необходимо выбрать хотя бы один вид лесоматериала.");
return;
}
//fill initial params
ValueList kinds = new ValueList();
for (int i = 0; i < SelectedKinds.size(); i++)
{
if (SelectedKinds[i].mark == 1)
{
string view;
Kind kind = SelectedKinds[i].GetKind()
switch (kind)
{
case KindType_12: view = "12C"; break;
case KindType_13: view = "13C"; break;
case KindType_3: view = "3C"; break;
case KindType_34: view = "34C"; break;
case KindType_5: view = "5C"; break;
case KindType_0: view = "0C"; break;
}
kinds.AddValue(kind, view);
}
}
TypesList lengthes = GetTypeList(SelectedLengthes);
TypesList humidities = GetTypeList(SelectedHumidites);
TypesList diameters = GetTypeList(SelectedDiametrs);
TypesList widthes = GetTypeList(SelectedWidthes);
TypesList woods = GetTypeList(SelectedWoods);
SelectedStores.Save(Storages)
}
Racoon- Сообщения : 76688
Откуда : Море Спокойствия
-
Re: Компьютерное железо и софт. Интернет.
автор Racoon Пт 10 Мар 2017, 17:40
Racoon- Сообщения : 76688
Откуда : Море Спокойствия
-
Re: Компьютерное железо и софт. Интернет.
автор Racoon Пт 10 Мар 2017, 17:45
- Код:
Процедура Сформировать()
// Проверим на ошибки
Если КонДата > КонецРассчитанногоПериодаБИ() Тогда
Предупреждение("Дата отчёта выходит за пределы рассчитанного периода бухгалтерских итогов.");
Возврат;
КонецЕсли;
ЕстьВыбранныйВидЛесоматериала = 0;
Для А=1 По ВыбВидыЛесоматериалов.РазмерСписка() Цикл
Если ВыбВидыЛесоматериалов.Пометка(А) = 1 Тогда
ЕстьВыбранныйВидЛесоматериала = 1;
Прервать;
КонецЕсли;
КонецЦикла;
Если ЕстьВыбранныйВидЛесоматериала = 0 Тогда
Предупреждение("Необходимо выбрать хотя бы один вид лесоматериала.");
Возврат;
КонецЕсли;
// Заполним начальные параметры
ВидыСортов = СоздатьОбъект("СписокЗначений");
Для А=1 По ВыбСорта.РазмерСписка() Цикл
Если ВыбСорта.Пометка(А) = 1 Тогда
Представление = "";
Сорт = ВыбСорта.ПолучитьЗначение(А, Представление);
Если Сорт = Перечисление.Сорт.ПервыйВторой Тогда
Представление = "12С";
ИначеЕсли Сорт = Перечисление.Сорт.ПервыйТретий Тогда
Представление = "13С";
ИначеЕсли Сорт = Перечисление.Сорт.Третий Тогда
Представление = "3С";
ИначеЕсли Сорт = Перечисление.Сорт.ТретийЧетвёртый Тогда
Представление = "34С";
ИначеЕсли Сорт = Перечисление.Сорт.БезСорта Тогда
Представление = "0С";
ИначеЕсли Сорт = Перечисление.Сорт.Пятый Тогда
Представление = "5С";
КонецЕсли;
ВидыСортов.ДобавитьЗначение(Сорт, Представление);
КонецЕсли;
КонецЦикла;
ВидыДлин = ПолучитьСписокВидов(ВыбДлины);
ВидыВлажности = ПолучитьСписокВидов(ВыбВлажность);
ВидыДиаметров = ПолучитьСписокВидов(ВыбДиаметры);
ВидыТолщинШирин = ПолучитьСписокВидов(ВыбТолщинаШирина);
ВидыЛесоматериалов = ПолучитьСписокВидов(ВыбВидыЛесоматериалов);
ВыбСклады.Выгрузить(МестаХранения);
- Код:
void CreateReport()
{
// check errors
if (FinishDate > EndOfCalculatedPeriodBI())
{
ShowMsg("Дата отчёта выходит за пределы рассчитанного периода бухгалтерских итогов.");
return;
}
bool bWoodSel = false;
for (int i = 0; i < SelWoodTypes.size(); i++)
if (bWoodSel = SelWoodTypes[A].marked)
break;
if (!bWoodSel )
{
ShowMsg("Необходимо выбрать хотя бы один вид лесоматериала.");
return;
}
//fill initial params
ValueList kinds = new ValueList();
for (int i = 0; i < SelKinds.size(); i++)
{
if (SelKinds[i].marked)
{
string view;
Kind kind = SelKinds[i].GetKind()
switch (kind)
{
case KindType_12: view = "12C"; break;
case KindType_13: view = "13C"; break;
case KindType_3: view = "3C"; break;
case KindType_34: view = "34C"; break;
case KindType_5: view = "5C"; break;
case KindType_0: view = "0C"; break;
}
kinds.AddValue(kind, view);
}
}
TypesList lengthes = GetTypeList(SelLengthes);
TypesList humidities = GetTypeList(SelHumidites);
TypesList diameters = GetTypeList(SelDiametrs);
TypesList widthes = GetTypeList(SelWidthes);
TypesList woods = GetTypeList(SelWoods);
SelStores.Save(Storages)
}
Racoon- Сообщения : 76688
Откуда : Море Спокойствия
-
Re: Компьютерное железо и софт. Интернет.
автор sabaca Пт 10 Мар 2017, 18:03
Много глобальных переменных...Racoon пишет:
Вместо этого лучше
ShowMsg("Дата отчёта выходит за пределы рассчитанного периода бухгалтерских итогов.");
либо статус возвращать либо исключение кинуть
sabaca- аналитег
- Сообщения : 5669
Откуда : Самара
-
Re: Компьютерное железо и софт. Интернет.
автор Racoon Пт 10 Мар 2017, 18:56
Это специфика 1С я так понимаю. Просто перевел на с++sabaca пишет:Много глобальных перемен
ных...
разумеется и без русского текста. Локализовать нужно позжеsabaca пишет:Вместо этого лучше
ShowMsg("Дата отчёта выходит за пределы рассчитанного периода бухгалтерских итогов.");
либо статус возвращать либо исключение кинуть
Racoon- Сообщения : 76688
Откуда : Море Спокойствия
-
Re: Компьютерное железо и софт. Интернет.
автор Линейцев Дмитрий Пт 10 Мар 2017, 19:30
Линейцев Дмитрий- КотоФлот - умеренный нытик
- Сообщения : 30351
Возраст : 57
Откуда : Столица Империи
-
Re: Компьютерное железо и софт. Интернет.
автор Racoon Пт 10 Мар 2017, 19:36
В общем быстрее тетриса ничего не светит.
Racoon- Сообщения : 76688
Откуда : Море Спокойствия
-
Re: Компьютерное железо и софт. Интернет.
автор sabaca Пт 10 Мар 2017, 19:49
Да ладно, ява не настолько медленная...Racoon пишет:Ну если хотя бы байт-код типа Явы у 1С есть (в чем я сильно сомневаюсь) то на порядок, если нет то на 2 порядка
В общем быстрее тетриса ничего не светит.
sabaca- аналитег
- Сообщения : 5669
Откуда : Самара
-
Re: Компьютерное железо и софт. Интернет.
автор Racoon Пт 10 Мар 2017, 19:53
это сейчас когда процессоры гигарцовые. А когда ее разработали специально для микроконтроллеров - она оказалась почти не применима. В итоге писали асме или c.sabaca пишет:Да ладно, ява не настолько медленная...
Racoon- Сообщения : 76688
Откуда : Море Спокойствия
-
Re: Компьютерное железо и софт. Интернет.
автор Racoon Пт 10 Мар 2017, 19:58
медленная. Там достаточно сложный механизм управления памятью - он весьма затратный по времени. Это раз. Второе все - Ява приложения исполняются на виртуальной машине, которая тоже ест ресурсы и время.sabaca пишет:Да ладно, ява не настолько медленная...
Ничего не имею против Явы, но только на мощном процессоре. Иначе даже интерфейс начинает безбожно тормозить, как и любой управляемый код.
Racoon- Сообщения : 76688
Откуда : Море Спокойствия
-
Re: Компьютерное железо и софт. Интернет.
автор sabaca Пт 10 Мар 2017, 19:59
Изначально она была как раз для "больших компьютеров", это потом ее потащили куда непопадя.Racoon пишет:А когда ее разработали специально для микроконтроллеров - она оказалась почти не применима.
sabaca- аналитег
- Сообщения : 5669
Откуда : Самара
-
Re: Компьютерное железо и софт. Интернет.
автор Racoon Пт 10 Мар 2017, 19:59
Брехняsabaca пишет:Изначально она была как раз для "больших компьютеров", это потом ее потащили куда непопадя.
Изначально язык назывался Oak («Дуб») разрабатывался Джеймсом Гослингом для программирования бытовых электронных устройств. Впоследствии он был переименован в Java и стал использоваться для написания клиентских приложений и серверного программного обеспечения.
Racoon- Сообщения : 76688
Откуда : Море Спокойствия
-
Re: Компьютерное железо и софт. Интернет.
автор sabaca Пт 10 Мар 2017, 20:03
В общем случае медленнее, но на некоторых задачах почти не уступает С. В современной Ява есть JIT, на крайний случай еще есть JNI. Вот памяти много жрет...Racoon пишет:медленная. Там достаточно сложный механизм управления памятью - он весьма затратный по времени. Это раз. Второе все - Ява приложения исполняются на виртуальной машине, которая тоже ест ресурсы и время.sabaca пишет:Да ладно, ява не настолько медленная...
Ничего не имею против Явы, но только на мощном процессоре. Иначе даже интерфейс начинает безбожно тормозить, как и любой управляемый код.
sabaca- аналитег
- Сообщения : 5669
Откуда : Самара
-
Re: Компьютерное железо и софт. Интернет.
автор Racoon Пт 10 Мар 2017, 20:05
на задачах ввода/вывода полагаю, когда программе нечего собственно делать, а только ждать результат.sabaca пишет:но на некоторых задачах почти не уступает С.
Racoon- Сообщения : 76688
Откуда : Море Спокойствия
-
Re: Компьютерное железо и софт. Интернет.
автор sabaca Пт 10 Мар 2017, 20:07
Не только... счетные задачи тоже быстро выполняются.Racoon пишет:на задачах ввода/вывода полагаю, когда программе нечего собственно делать, а только ждать результат.
sabaca- аналитег
- Сообщения : 5669
Откуда : Самара
-
Re: Компьютерное железо и софт. Интернет.
автор Racoon Пт 10 Мар 2017, 20:08
только в случае преобразования байт кода в машинный код. Других возможностей я не вижу.sabaca пишет:Не только... счетные задачи тоже быстро выполняются.
Racoon- Сообщения : 76688
Откуда : Море Спокойствия
-
Re: Компьютерное железо и софт. Интернет.
автор sabaca Пт 10 Мар 2017, 20:09
разумеется JIT... и конечно речь о тех реализациях JVM где есть JIT.Racoon пишет:только в случае преобразования байт кода в машинный код. Других возможностей я не вижу.
sabaca- аналитег
- Сообщения : 5669
Откуда : Самара
-
Re: Компьютерное железо и софт. Интернет.
автор Racoon Пт 10 Мар 2017, 20:17
Так то да. Но это своего рода жульничество Не чистая виртуальность. Впрочем весьма эффективное. но всё равно медленней однажды скомпилированного машинного кода.sabaca пишет:разумеется JIT... и конечно речь о тех реализациях JVM где есть JIT.
Racoon- Сообщения : 76688
Откуда : Море Спокойствия
-
Re: Компьютерное железо и софт. Интернет.
автор sabaca Пт 10 Мар 2017, 20:19
Не всегда, иногда даже быстрее может быть.Racoon пишет:но всё равно медленней однажды скомпилированного машинного кода.
sabaca- аналитег
- Сообщения : 5669
Откуда : Самара
-
Re: Компьютерное железо и софт. Интернет.
автор Racoon Пт 10 Мар 2017, 20:22
Не обманывай. Это априори не может быстрее оптимизированного машинного кода. Потому что на JIT-компиляцию нужно время, даже если она выдает оптимизированный кодsabaca пишет:Не всегда, иногда даже быстрее может быть.
Racoon- Сообщения : 76688
Откуда : Море Спокойствия
-
Страница 3 из 34 • 1, 2, 3, 4 ... 18 ... 34