- 1
- 2
- 3
- 4
f :: [Int] -> [Int]
f [] = []
f [a] = []
f (a:b:lst) = b: f lst
Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
0
f :: [Int] -> [Int]
f [] = []
f [a] = []
f (a:b:lst) = b: f lst
Как вытащить каждый второй элемент из массива.
0
public function getDialogs($offset = 0) {
$offset = (int) $offset;
$to_id = $_SESSION['user_id'];
if(!$to_id) {
return false;
}
$get_dialogs = $this->database->prepare("SELECT * FROM `messages` WHERE `to_id` = :to_id GROUP BY `from_id` LIMIT :offset, :max_posts");
$get_dialogs->bindParam(':to_id', $to_id, PDO::PARAM_INT);
$get_dialogs->bindParam(':offset', $offset, PDO::PARAM_INT);
$get_dialogs->bindParam(':max_posts', $this->max_dialogs, PDO::PARAM_INT);
$get_dialogs->execute();
$post_owners = array();
while ($row = $get_dialogs->fetch(PDO::FETCH_ASSOC)) {
$owner_id = $row['from_id'];
if($post_owners[$owner_id]) {
$row['owner_name'] = $post_owners[$owner_id];
} else {
$owner_name = $this->user->getInitials($owner_id);
$post_owners[$owner_id] = $owner_name;
$row['owner_name'] = $owner_name;
}
$row['date'] = $this->common->parseTimestamp($row['date_created']);
$arr[] = $row;
}
return $arr;
}
получение сообщений
+131
using System;
using System.Collections.Generic;
using System.IO;
using System.Text;
namespace CA1
{
class Program
{
static void Main()
{
int buffer;
int Cout = 0;
string line;
System.IO.StreamReader file = new System.IO.StreamReader("file.txt");
while ((line = file.ReadLine()) != null)
{
buffer = Convert.ToInt32(line);
if(buffer > 0)
{
if(buffer / 2 > 5 && buffer / 2 < 49.5)
{
Cout++;
}
}
if (buffer < 0)
{
if (buffer / 2 < - 5 && buffer / 2 > - 49.5)
{
Cout++;
}
}
}
Console.WriteLine(Cout);
Console.ReadLine();
}
}
}
Вычисление количества цифр в числе
+117
BACBBFBDGAAEAAAAAAAAAAAAAAAAAAAGGAAEAAAAAAAFAAAAAAAAAAAAFAAAAAAAAAAAFAAAAAAAAAAABAAAABAAAAAAAAAAAAAAAAAFAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACAAAAAAAACAAAAAAAAAAACAACAAAAACAAAAAAAAAAACAAAAACAAAAACAACAAAAAAAADAADAADAAAAADAADDEDAAAAADGADBCCEGAAAAAAAEABAAAAAAAAAEABEAAAAAAAAEACAAAAAAAAAEACEAAAAAAAAEADAAAAAAAAAEADEAAAAAAABAAAAAAAAAAABAAAEAAAAAAABAABAAAAAAAABAABEAAAAAAABAACAAAAAAAABAACEAAAAAAABAADAAAAAAAABAADEAAAAAAABEAAAAAAAAAABEAAEAAAAAAABEABAAAAAAAABEABEAAAAAAABEACAAAAAAAABEACEAAAAAAABEADAAAAAAAABEADEAAAAAAACAAAAAAAAAAACAAAEAAAAAAACAABAAAAAAAACAABEAAAAAAACAACAAAAAAAACAACEAAAAAAACAADAAAAAAAACAADEAAAAAAACEAAAAAAAAAACEAAEAAAAAAACEABAAAAAAAACEABEAAAAAAACEACAAAAAAAACEACEAAAAAAACEADAAAAAAAACEADEAAAAAAADAAAAAAAAAAADAAAEAAAAAAADAABAAAAAAAADAABEAAAAAAADAACAAAAAAAADAACEAAAAAAADAADAAAAAAAADAADEAAAAAAADEAAAAAAAAAADEAAEAAAAAAADEABAAAAAAAADEABEAAAAAAADEACAAAAAAAADEACEAAAAAAADEADAAAAAAAADEADEAAAABAAAAAAAAAAABAAAAAAEAAAABAAAAABAAAAABAAAAABEAAAABAAAAACAAAAABAAAAACEAAAABAAAAADAAAAABAAAAADEAAAABAAAEAAAAAAABAAAEAAEAAAABAAAEABAAAAABAAAEABEAAAABAAAEACAAAAABAAAEACEAAAABAAAEADAAAAABAAAEADEAAAABAABAAAAAAAABAABAAAEAAAABAABAABAAAAABAABAABEAAAABAABAACAAAAABAABAACEAAAABAABAADAAAAABAABAADEAAAABAABEAAAAAAABAABEAAEAAAABAABEABAAAAABAABEABEAAAABAABEACAAAAABAABEACEAAAABAABEADAAAAABAABEADEAAAABAACAAAAAAAABAACAAAEAAAABAACAABAAAAABAACAABEAAAABAACAACAAAAABAACAACEAAAABAACAADAAAAABAACAADEAAAABAACEAAAAAAABAACEAAEAAAABAACEABAAAAABAACEABEAAAABAACEACAAAAABAACEACEAAAABAACEADAAAAABAACEADEAAAABAADAAAAAAAABAADAAAEAAAABAADAABAAAAABAADAABEAAAABAADAACAAAAABAADAACEAAAABAADAADAAAAABAADAADEAAAABAADEAAAAAAABAADEAAEAAAABAADEABAAAAABAADEABEAAAABAADEACAAAAABAADEACEAAAABAADEADAAAAABAADEADEAAAACAAAAAAAAAAACAAAAAAEAAAACAAAAABAAAAACAAAAABEAAAACAAAAACAAAAACAAAAACEAAAACAAAAADAAAAACAAAAADEAAAACAAAEAAAAAAACAAAEAAEAAAACAAAEABAAAAACAAAEABEAAAACAAAEACAAAAACAAAEACEAAAACAAAEADAAAAACAAAEADEAAAACAABAAAAAAAACAABAAAEAAAACAABAABAAAAACAABAABEAAAACAABAACAAAAACAABAACEAAAACAABAADAAAAACAABAADEAAAACAABEAAAAAAACAABEAAEAAAACAABEABAAAAACAABEABEAAAACAABEACAAAAACAABEACEAAAACAABEADAAAAACAABEADEAAAACAACAAAAAAAACAACAAAEAAAACAACAABAAAAACAACAABEAAAACAACAACAAAAACAACAACEAAAACAACAADAAAAACAACAADEAAAACAACEAAAAAAACAACEAAEAAAACAACEABAAAAACAACEABEAAAACAACEACAAAAACAACEACEAAAACAACEADAAAAACAACEADEAAAACAADAAAAAAAACAADAAAEAAAACAADAABAAAAACAADAABEAAAACAADAACAAAAACAADAACEAAAACAADAADAAAAACAADAADEAAAACAADEAAAAAAACAADEAAEAAAACAADEABAAAAACAADEABEAAAACAADEACAAAAACAADEACEAAAACAADEADAAAAACAADEADEAAAADAAAAAAAAAAADAAAAAAEAAAADAAAAABAAAAADAAAAABEAAAADAAAAACAAAAADAAAAACEAAAADAAAAADAAAAADAAAAADEAAAADAAAEAAAAAAADAAAEAAEAAAADAAAEABAAAAADAAAEABEAAAADAAAEACAAAAADAAAEACEAAAADAAAEADAAAAADAAAEADEAAAADAABAAAAAAAADAABAAAEAAAADAABAABAAAAADAABAABEAAAADAABAACAAAAADAABAACEAAAADAABAADAAAAADAABAADEAAAADAABEAAAAAAADAABEAAEAAAADAABEABAAAAADAABEABEAAAADAABEACAAAAADAABEACEAAAADAABEADAAAAADAABEADEAAAADAACAAAAAAAADAACAAAEAAAADAACAABAAAAADAACAABEAAAADAACAACAAAAADAACAACEAAAADAACAADAAAAADAACAADEAAAADAACEAAAAAAADAACEAAEAAAADAACEABAAAAADAACEABEAAAADAACEACAAAAADAACEACEAAAADAACEADAAAAADAACEADEAAAADAADAAAAAAAADAADAAAEAAAADAADAABAAAAADAADAABEAAAADAADAACAAAAADAADAACEAAAADGADODDOOAAACEECEACEAAAACAACAACAAAAAAAAAAADOOAAAAAADOOAAAAAAAAADOODOOAAADOOAAAAAAAAADOOAAADOOAAADOODOOAAAAAADOODOODOOAAADOOAAAAAAAAADOOAAAAAAAAAAAADOODOODOOAAAAAAAAAAAADOODOOAGODOODOOAAAAAAAAADOODOODOODOODOOAAAAAAAAADOODFADOODFADOOAAAAAAAAA
Картинка с расширением .bmp, написанная в машинных кодах на системе счисления wct. (программа - http://yadi.sk/d/i9Me1IQ7MbHCD wct editor). http://wctsite.tk.
P.S. Если кто-то смог сохранить и посмотреть, что находится в картинке, то напишите в комментариях. Подсказка: первая буква - "с". Всего 7 букв :D
0
https://github.com/moscow-technologies/blockchain-voting/tree/voting2020/elec2020/ballot
https://github.com/moscow-technologies/blockchain-voting/blob/voting2020/elec2020/ballot/public/js/forms/mgik/LeavingPageCheckerInit.js
https://github.com/moscow-technologies/blockchain-voting/blob/voting2020/elec2020/frontend-library-source/crypto-lib/src/util/numberFromLeBytes.js
Как и всё в этой стране, обнуление написано на PHP, jQuery и (да-да) местами Rust, а управляется supervisord, ибо для редактирования юнитов systemd нужно sudo, который не дали.
Какой блокчейн )))
0
1419 guest
234 j123123
222 LispGovno
202 wvxvw
188 Говногость
161 gost
160 Lure Of Chaos
158 Stertor
155 bormand
128 kyzi007
123 pedarok
120 qbasic
116 Elvenfighter
115 someone
113 3.14159265
102 dm_fomenok
101 roman-kashitsyn
100 eldachello
94 Dummy00001
93 TarasB
88 Vasiliy
86 cmepmop
85 Dr_Stertor
84 syoma
73 7ion
72 laMer007
69 d_fomenok
61 хуита
60 Мартин
60 BEPETEHO
60 3_14dar
58 AliceGoth
58 CHayT
56 Fai
56 kegdan
55 uiopqwertyasd
55 munin
54 HaskellGovno
51 bugmenot
51 Abbath
51 vistefan
50 nethak
49 makc3d
49 Fike
48 inkanus-gray
47 telnet
47 Govnocoder#0xFF
47 3_dar
44 codemonkey
44 OlegUP
43 RaZeR
42 Sulik78
41 CPPGovno
41 alexoy
41 DrFreez
41 varg242
40 danilissimus
39 taburetka
39 KitKat
38 dwinner
38 absolut
38 striker
37 raorn
37 jQuery
37 inho
35 psina-from-ua
35 rat4
35 1kasper
35 brainstorm
35 Stallman
34 ursus
34 KirAmp
33 evg_ever
33 invision70
33 Lokich
33 Xom94ok
32 1_and_0
32 istem
32 volter9
+2
ВЫБРАТЬ
КОЛИЧЕСТВО ( РАЗЛИЧНЫЕ УвольнениеИзОрганизации.Сотрудник) КАК Сотрудник
Кадровая история сотрудников спецслужб их.Подразделение,
ЕСТЬNULL (КОЛИЧЕСТВО ( РАЗЛИЧНЫЕ ВЫБОР
КОГДА УвольнениеИзОрганизаций.СтатьяТКРФ.Наименование = "" По собой желанию, на учебу пункт 3 статьи 77 ТК РФ""
ИЛИ УвольнениеИзОрганизаций.СтатьяТКРФ.Наименование ="" По соб желанию, по уходу за инвалидном п.3 статьи 77 ТК РФ""
ИЛИ УвольнениеИзОрганизаций.СтатьяТКРФ.Наименование = "" По соб желанию, ребёнок-инвалид до 18 л., А 3 статьи 77 ТК РФ""
ИЛИ УвольнениеИзОрганизаций.СтатьяТКРФ.Наименование ="" По соб желанию , с переменой м. ж., пункт 3 статьи 77 ТК РФ""
ИЛИ УвольнениеИзОрганизаций.СтатьяТКРФ.Наименование ="" По соб желанию, по уходу за ребенком до 14 лет, п 3 статьи 77 ТК РФ""
ИЛИ УвольнениеИзОрганизаций.СтатьяТКРФ.Наименование ="" По соб желанию , на пенсию, п 3 статьи 77 ТК РФ""
ИЛИ УвольнениеИзОрганизаций.СтатьяТКРФ.Наименование ="" по соб желанию, п.3 статьи 77 ТК РФ""
ТОГДА УвольнениеИзОрганизаций.Сотрудник
КОНЕЦ ), 0) КАК увПоСобств,
ЕСТЬNULL (ВЫБОР
КОГДА УвольнениеИзОрганизаций.СтатьяТКРФ.Наименование ="" За прогулы, подпункт """" а"""" пункта 6 статьи 81 ТК РФ""
ТОГДА УвольнениеИзОрганизаций.Сотрудник
КОНЕЦ ,0) КАК УвПрогул,
ЕСТЬNULL ( КОЛИЧЕСТВО ( РАЗЛИЧНЫЕ УвольнениеИзОрганизации.Сотрудник
),0) Как УвВсего
ИЗ Документ.Увольнение.Сотрудник КАК УвольнениеИзОрганизации
ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.КадроваяИсторияСотрудников.СрезПоследних как КадроваяИсторияСотрудниковСрезПоследних
ПО Сотрудник КАК УвольнениеИзОрганизации.Сотрудник = КадроваяИсторияСотрудниковСрезПоследних.Сотрудник
ГДЕ
УвольнениеИзОрганизации.Ссылка.Организации в ИЕРАРХИИ (& Организация)
И УвольнениеИзОрганизации.ДатаУвольнения >=& НачалоГода
И (УвольнениеИзОрганизаций.СтатьяТКРФ.Наименование ="" По соб желанию, по уходу за инвалидном п.3 статьи 77 ТК РФ""
ИЛИ УвольнениеИзОрганизаций.СтатьяТКРФ.Наименование = "" По соб желанию, ребёнок-инвалид до 18 л., А 3 статьи 77 ТК РФ""
ИЛИ УвольнениеИзОрганизаций.СтатьяТКРФ.Наименование ="" По соб желанию , с переменой м. ж., пункт 3 статьи 77 ТК РФ""
ИЛИ УвольнениеИзОрганизаций.СтатьяТКРФ.Наименование ="" По соб желанию, по уходу за ребенком до 14 лет, п 3 статьи 77 ТК РФ""
ИЛИ УвольнениеИзОрганизаций.СтатьяТКРФ.Наименование ="" По соб желанию , на пенсию, п 3 статьи 77 ТК РФ""
ИЛИ УвольнениеИзОрганизаций.СтатьяТКРФ.Наименование ="" по соб желанию, п.3 статьи 77 ТК РФ""
ИЛИ УвольнениеИзОрганизаций.СтатьяТКРФ.Наименование ="" За прогулы, подпункт """" а"""" пункта 6 статьи 81 ТК РФ""
)
СГРУППИРОВАТЬ ПО
КадроваяИсторияСотрудниковСрезПоследних.Подразлеление
ЕСТЬNULL (ВЫБОР
КОГДА Увольнение Зоран зайти.СтатьяТКРФ.Наименование = "" За прогулы, подпункт """" а"""" пункта 6 статьи 81 ТК РФ""
ТОГДА УвольнениеИзОрганизации.Сотрудник
КОНЕЦ ,0);
Зачем ему конфигуратор? Он и так может отчеты выводить в табДок через блокнот)))
Ссылка на источник ТУТ - http://www.cyberforum.ru/1c/thread2394049.html
−1
void sort8(uint64_t a[8])
{
uint64_t a0;
uint64_t a1;
uint64_t a2;
uint64_t a3;
uint64_t a4;
uint64_t a5;
uint64_t a6;
uint64_t a7;
SORT2(a[0], a[1], a0, a1);
SORT2(a[2], a[3], a2, a3);
SORT2(a[4], a[5], a4, a5);
SORT2(a[6], a[7], a6, a7);
uint64_t a_tmp[8];
MERGE_2_4(a0, a1, a2, a3, a_tmp[0], a_tmp[1], a_tmp[2], a_tmp[3]);
MERGE_2_4(a4, a5, a6, a7, a_tmp[4], a_tmp[5], a_tmp[6], a_tmp[7]);
uint64_t *ptra1 = &a_tmp[0];
uint64_t *ptra2 = &a_tmp[4];
for (size_t i = 0; i < 4; i++)
{
if (*ptra1 < *ptra2)
{
a[i] = *ptra1;
ptra1++;
}
else
{
a[i] = *ptra2;
ptra2++;
}
}
for (size_t i = 4; i < 8; i++)
{
if (ptra1 == &a_tmp[4])
{
while (ptra2 != &a_tmp[8])
{
a[i++] = *ptra2;
ptra2++;
}
break;
}
if (ptra2 == &a_tmp[8])
{
while (ptra1 != &a_tmp[4])
{
a[i++] = *ptra1;
ptra1++;
}
break;
}
if (*ptra1 < *ptra2)
{
a[i] = *ptra1;
ptra1++;
}
else
{
a[i] = *ptra2;
ptra2++;
}
}
}
Мерж сорт, специализированный на 8 элементов. Вот доказательство корректности https://paste.debian.net/hidden/cce6d31a/
0
https://habr.com/post/419141/
−4
/**
* Colors which you can use in your application.
*/
typedef enum
{
BLACK, /**< black color */
BLUE, /**< blue color */
GREEN, /**< green color */
CYAN, /**< cyan color */
RED, /**< red color */
MAGENTA, /**< magenta color */
BROWN, /**< brown color */
LIGHTGRAY, /**< light gray color */
DARKGRAY, /**< dark gray color */
LIGHTBLUE, /**< light blue color */
LIGHTGREEN, /**< light green color */
LIGHTCYAN, /**< light cyan color */
LIGHTRED, /**< light red color */
LIGHTMAGENTA, /**< light magenta color */
YELLOW, /**< yellow color */
WHITE /**< white color */
} COLORS;