Жара. Воспаленное воображение...

Вот что может вызвать жара, из-за которой начинается плавится мозг в процессе изучения С-51 и попыток кодинга под контроллер...

В общем, нашел я пачку 3,5 дискет, точнее 3 пачки, и вот что родилось в голове после пары минут созерцания этих пачек:

Владельцам модемов, роутеров

Если во время жары ваш модем или роутер начинает неистово ребутаться и отваливаться от сети, не спешите названивать в техподдержку, просто отсоедините ваш модем или роутер от сети, остудите его и включите снова, желательно поставив на попа, чтобы уменьшить соприкосновение его плоскостей со столом или полкой, на которой он стоит.  Эти проблемы тоже от перегрева =)

Надеюсь, кому-нибудь поможет.

Когда же переведутся идиоты на Руси?

Сегодня убедился, что народ, по крайней мере 90 его процентов, напрочь имбицилы, ну или пытаются быть ими. Шел на работу, увидел идущую перед собой тетку, у которой была огромная пятая точка, да и сама тетя довольно крупная, так вот на эту огромную, извините за выражение, жопу были натянуты немного прозрачные брюки, через которые просвечивало какое-то подобие стрингов. Ужас! А когда был в Нерезиновске видели что-то подобное, но более суровое и удасное - девушка, лет точно хз сколько, промежуток определить сложно, но что-то от 23 до 30, я бы сказал, шла в чем-то подобном, как вышеописанная тетка. Точнее не просто в чем-то подобном, а в эдаких штанишках обтяжку, сверху которые обтягивали живот и показывали вываливающиеся из него складки жира. Все это сопровождалось толстыми короткими ножками, торчащими из-под этих штанишек и отпугивающие идущих навстречу голубей...

Когда-же переведутся идиоты на Руси?

Русские буквы в консольных приложениях Delphi

Многие сталкивались с проблемой, когда консольное приложение, написанное в среде Borland Delphi отображает при запуске не русские буквы, а крякозябры Решение этой проблемы:

program Project1;
{$APPTYPE CONSOLE}
uses SysUtils, Windows;

function StrAnsiToOem(const S: AnsiString): AnsiString;
begin
  SetLength(Result, Length(S));
  AnsiToOemBuff(@S[1], @Result[1], Length(S));
end;

begin
  WriteLn(StrAnsiToOem('Это текст будет в консоли по русски!'));
end.

Пузырьковая сортировка массива по возрастанию/убыванию

Надо же начинать заполнять только что осзданный блог. Собсно вот.

Алгоритм сортировки массива так называемым "пузырьковым" методом, код пириведен на С. Ориентировано на новичков в программизме.

#include
#define SIZE 10
int main (int argc, char* argv[])
{
    int mass[SIZE] = {44,55,45,16,9,-1,65,19,3,5};
    for (int i = 0; i < SIZE; ++i) printf("%d ",mass[i]);
    printf("\n");
    /*пузырьковая сортировка по убыванию*/
    for (int i = 0; i
        int tmp = 0;
        for (int j=(i+1); j
            if (mass[i]
                tmp = mass[i];
                mass[i] = mass[j];
                mass[j] = tmp;       
                }
    }
    for (int i = 0; i < SIZE; ++i) printf("%d ",mass[i]);
    printf("\n");
    return 0;
}

Удачи в кодинге!

Первая мессага

Вот и забабахал я себе технический блог. Таперича буду постить сюду всякую ерунду. Или не ерунду. Или не постить. Или не я...