Ну, здравствуйте...

Мутотень, глупости, непризнанные аргументы и прочее ждет вас здесь!

суббота, 31 декабря 2011 г.

HAPPY NEW YEAR

С Новым Годом, дорогие читатели!!!

P.S.: Зима не будет -> Новый Год не будет :D

Ваш, весь из себя Новогодний, автор

пятница, 16 декабря 2011 г.

GIF

Все ходите на мой второй блог http://www.dota2fanart.blogspot.com/ оценивайте гифки...Новые каждый день в 10 утра без выходных :D

P.S.: не я их делал, я их где-то нашел, скачал и хочу что бы вас тоже захлестнули чувства и т.д.

Ваш, коллекционирующий всякую мутотень, автор

EVIL IN ME

Зло, онов каждом из нас...  Может быть это не так уж страшно, но в каждый момент оно может выплеснуться наружу и обрызгать всех окружающих. Это зло - воспаление от нормальной жизни:ругательств, подлости, вранья, наглости, гордости, издевательств...

P.S.: Skrillex "Evil As Satan"

Ваш, блуждающий по кругам ада, автор

пятница, 18 ноября 2011 г.

GAME

Вот она, вот она игра моей мечты...



program castlemania;
uses CRT;
var start_agree,player_name,adventure_agree,answer1,weapon,answer4,answer5,an1,an2,an3:string;
map,gold,mapgold,action,answer2,weaponlvl,answer3,rage,buying,golda,robers,answer6:integer;
begin
writeln ('%%%%%%%%%%loading%%%%%%%%%%%%%');
writeln ('***Welcome to Castle Mania***');
writeln;
writeln ('***Creator: Leonid  Prohor***');
writeln;
writeln ('type ^start^ to play the game');
readln (start_agree);
                                                    {ïåðåìåííûå}
 map:=0;
 mapgold:=0;
 gold:=0;
 weaponlvl:=0;
 weapon:='no';

if start_agree='start' then
    begin
    writeln ('^^^type your name pls^^^');
    readln (player_name);
      if player_name=''then player_name:='noname';
    writeln ('Hello, ', player_name,'!');
    writeln (player_name,', you must to save princess... she is in the castle! Dragon steal her :(');
    writeln ('  Are you ready for yhe ADVENTURE???');
    readln (adventure_agree);
    if adventure_agree='yes' then
         begin
         while action<>4 do
             begin
             writeln ('You have ',gold,' gold and ',weapon,' weapon .What will you do? ');
             writeln ('type what you want to do with number of action');
             writeln ('   1)go to weapon shop;');
             writeln ('   2)go to library;');
             writeln ('   3)go to gold prisk;');
             writeln ('   4)go to kill the dragon and save the princess!!!;');
             readln (action);
             if action=2 then
                          begin  {library}
                          writeln (player_name, ' come to the library and see somebody');
                          while answer1<>'no' do
                                  begin
                                  writeln ('?????: ',player_name,', do you want to ask smth?');
                                  readln (answer1);
                          if answer1='yes' then
                          begin
                          writeln ('1)how to kill dragon; 2)how to get money;');
                          readln (answer2);
                          if answer2=1 then begin
                             writeln ('?????: i know how to do this!');
                             writeln (player_name, ': ???');
                             writeln ('?????: you must have a cool weapon to defeat dragon :D');
                             writeln (player_name, ': where i can get it?');
                             writeln ('?????: in the weapon shop :) here is ticket fo shop. If u have it saleman will not kill you :D');
                             writeln (player_name, ': ok');
                             map:=1;                    {OMGOMGOMGOMGOMGOMGOGMOGMGOMGOMG!!!!!!!!!!!!!!!!!!!!!!!!!}
                             end else begin
                                                          writeln ('?????: i think that...');
                             writeln (player_name, ': ???');
                             writeln ('?????: you can get money by doing smth');
                             writeln (player_name, ': where i can do this?');
                             writeln ('?????: in the gold prisk :)');
                             writeln (player_name, ': ok :(');
                             mapgold:=1; {OMGOMGOMGOMGOMGOMGOGMOGMGOMGOMG!!!!!!!!!!!!!!!!!!!!!!!!!}
                            
                          end;
                          end;
                          writeln (player_name,' lives library');
             end; end;
           if action=1  then
                          begin
                           begin
                             while answer3<>1 do
                             begin
                             writeln (player_name,' comes to weapon shop and knock door');
                             writeln ('saleman: what are you need?');
                             if map=0 then begin
                                   writeln (player_name,': open door, pls');
                                   writeln  ('saleman: Grrr.... go out stupid knight!!!!');
                                   end else
                                   begin
                                    writeln (player_name,': somebody send me to you');                                      {BUYBUYBUY!!!!}
                                     writeln  ('saleman: Ow... Come in :D');
                                     writeln ('saleman: you can buy something if you have money :)');
                                     writeln ('1)=====0 (stick) 10 gold');
                                     writeln ('2)<>========<> (double-stick) 20 gold');
                                     writeln ('3)========IoI> (super stick) 30 gold' );
                                     writeln ('4)=I=====> (sword) 50 gold');
                                     writeln ('5)=II+=+=+=+=<> (super duper mega extra chain-sword :D) 100 gold');
                                     writeln ('what do you want to by, if your gold - ',gold);
                                     writeln ('if you try to buy smth so reach, thet you have not money for it, i will take your money!!!');
                                     readln (buying);
                                         while answer4<>'no' do
                                         begin
                                          if (buying=1) and (gold>=10) then begin
                                                                            writeln ('you have bought stick for 10 gold');
                                                                            weaponlvl:=1;
                                                                            weapon:='stick';
                                                                            gold:=gold-10;
                                                                            end;
                                                                            if (buying=2) and (gold>=20) then begin
                                                                            writeln ('you have bought double-stick for 20 gold');
                                                                            weaponlvl:=2;
                                                                            weapon:='double-stick';
                                                                            gold:=gold-20;
                                                                            end;
                                                                            if (buying=3) and (gold>=30) then begin
                                                                            writeln ('you have bought super stick for 30 gold');
                                                                            weaponlvl:=3;
                                                                            weapon:='super stick';
                                                                            gold:=gold-30;
                                                                            end;
                                                                            if (buying=4) and (gold>=50) then begin
                                                                            writeln ('you have bought sword for 50 gold');
                                                                            weaponlvl:=4;
                                                                            weapon:='sword';
                                                                            gold:=gold-50;
                                                                            end;
                                                                            if (buying=5) and (gold>=100) then begin
                                                                            writeln ('you have bought super duper mega extra chain-sword for 100 gold');
                                                                            weaponlvl:=5;
                                                                            weapon:='super duper mega extra chain-sword';
                                                                            gold:=gold-100;
                                                                            end;
                                          writeln ('do you want to by something more? You have ' ,gold, ' gold');
                                          readln (answer4);
                                          end;
                                   end;
                             writeln ('lives shop (1) or come again (2)');
                             readln (answer3);
                           end;

                          end;

                         
                          end;
                          if action=3 then
                          begin

                              golda:=random (10);
                              writeln ('you comes to the gold priisk and find ',golda,' gold');
                              gold:=gold+golda;

                           end;

                         

   
     end;
     writeln (player_name,' take ',weapon,' and ',gold,' gold and go to the dragons cave...');
     writeln ('but suddenly ',player_name,' see robbers :O');
     writeln ('roobers want to kill him or get 75 gold');
     writeln ('1)get it!(give to them 75g); 2)go out, i will kill you!!!');
     readln (robers);
     if robers<>1 then
                      begin
                      writeln ('robbers kill ',player_name);
                      writeln ('~~~~~~ THE BAD END ~~~~~~~~');
                      writeln ('no extars :(');
                      end else
                      begin
                      if gold<75 then
                                            begin
                      writeln ('robbers kill ',player_name);
                      writeln ('~~~~~~ THE BAD END ~~~~~~~~');
                      writeln ('no extars :(');
                      end else
                                                              begin
                                                              writeln ('you give them money and walk away to the cave...');
                                                              writeln (player_name,' enters the cave :P');
                                                              writeln (player_name,' see a big red DRAGON!!!!!!!!!!!!!');
                                                              writeln ('DRAGON: I WILL KILL YOU AND PRINCESS!!! MVA-HA-HA-HA-HA!!!');
                                                              writeln ('1)flee; 2)attack;');
                                                              readln (answer6);
                                                              if answer6=1 then
                                                                         begin
                                                                            writeln ('dragon eat princess');
                                                                             writeln ('~~~~~~ THE BAD END ~~~~~~~~');
                                                                              writeln ('no extars :(');
                                                                              end else
                                                                                 begin
                                                                                 writeln ('you attacks the dragon by ',weapon);
                                                                                 if weaponlvl=5 then
                                                                                                 begin
                                                                                                 writeln ('YOU DEFEAT DRAGON!!!');
                                                                                                 writeln ('...and save princess');
                                                                                                 writeln ('~~~~~~ HAPPY END!!! ~~~~~~~~');
                                                                                                 writeln ('see extars?');
                                                                                                 readln (an2);
                                                                                                 if an2='yes' then
                                                                                                                 begin
                                                                                                                 writeln ('~~~~~~~~~~~~~EXTARS~~~~~~~~~~~~');
                                                                                                                 writeln;
                                                                                                                 writeln ('======PROHORCHENKO LEONID======');
                                                                                                                 writeln ('          ) IDEA (             ');
                                                                                                                 writeln ('         ) PROGRAMM (           ');
                                                                                                                 writeln ('          ) TEXT (             ');


                                                                                                                  end;
                                                                                                
                                                                                                 end else
                                                                                                     begin
                                                                                                     writeln (' with no effect');
                                                                                                     writeln ('dragon eat ',player_name);
                                                                                                      writeln ('~~~~~~ THE BAD END ~~~~~~~~');
                                                                                                      writeln ('no extars :(');
                                                                                                     end
                                                                                 end;
                                                              end;
                      end;
end;
end;
end.

воскресенье, 13 ноября 2011 г.

суббота, 12 ноября 2011 г.

Olympia!

Втречайте программу, над которой я работал около часа. Олимпиадная задача №1. Помимо строгих подсчётов, выводит ещё и прикольный рисунок :D

program ex1;
uses CRT;
var a:array[0..100,0..100]of integer;
i,j,k,w,h,n,x1,y1,x2,y2,Ko,R:integer;
begin
writeln ('dlina x shirina');
readln (h,w);
Ko:=0;
for i:=1 to w do
     begin
     for j:=1 to h do
         A[i,j]:=0;
     end;
 for i:=1 to w do
     begin
     for j:=1 to h do
         write (A[i,j]);
     writeln;
     end;
writeln ('kol-vo <>');
readln (n);
for k:=1 to n do
    begin
    writeln ('x1,y1,x2,y2');
    readln (x1,y1,x2,y2);
        for i:=x1 to x2 do
           begin
           for j:=y1 to y2 do
              A[i,j]:=A[i,j]+1;
           end;
    end;
     for i:=1 to w do
     begin
     for j:=1 to h do
         if A[i,j]>0 then Ko:=Ko+1;
     end;
for i:=1 to w do
   begin
   for j:=1 to h do
         write (A[i,j]);
   writeln;
   end;
R:=h*w-Ko;
writeln (R);
end.

Ваш, ждущий побед, автор

суббота, 5 ноября 2011 г.

SURVIVAL

Умение выжить и вовремя вытащить отмороженное лицо из ледяной воды делает человека особенно нужным. Я это прочувтвовал, сделав 20 задач по физике, накатав геометрию и рассмотрев олимпиадную задачу по информатике, да кстати вот она:

program ex1;
var a:array[1..12] of integer;
    n,i,d,c,w:integer;
begin
for i:=1 to 12 do
 begin
  if (i=1) or (i=3) or (i=5) or (i=7) or (i=8) or (i=10) or (i=12) then a[i]:=31 else a[i]:=30;
  if i=2 then a[i]:=28;
 end;
writeln ('vvedite 0<n<365');
readln (n);
d:=0;
for i:=1 to 12 do
  begin
  d:=d+a[i];
  if d>n then
      begin
      c:=a[i]-(d-n);
      w:=n mod 7;
      if w=0 then w:=7;
      writeln (c,' ',i,' ',w);
      break;
      end;
  end;
end.

Наслаждайтесь...

Ваш, дарящий наслаждение, решивший всю домашку, автор

вторник, 25 октября 2011 г.

LOADING

Извините пожалуйста, но я забыл какие номера конкретно задали. Спросил у ребят: говорят 135 и 138. Ну, нет проблем:
Вот 135:

Program ex135;
var a : string;
i, j : integer;
begin
     writeln ('vvedite stroku');
     readln (a);
     j := length (a);
     if j mod 2 <> 0
     then
     delete (a, j div 2 + 1, 1)
     else
     delete (a, j div 2 + 1, 2);
     writeln (a);
end.

А вот 138:

Program ex138 ;
var S : string;
i,j,a,b,c,K : integer;
begin
writeln('vvedite chislo ');
readln(S);
j:=length(S);
K:=0;
for i:=1 to j do
   if pos (copy(S,i,i),S)=1 then K:=K+1;
writeln (K);
for i:=1 to K do
   begin
   a:=Pos('z',S);
   delete(S,a,1) ;
   Insert('f',S,a);
end;
writeln(S);
end.

Вроде всё работает :D

суббота, 22 октября 2011 г.

№22

Осень... Что для вас значит это слово? А может и не слово? Для меня осень - это пора великих сверщений, разочарований и самой великой из всех сил - лени. Как говорят, лень - это умение устать до того, как начнёшь что-нибудь делать. Меня даже назвали в её честь :D Но если честно, то речь шла об осени. Осень, осень, осень. Хочется сидеть дома, раскисая под минорные раскаты музыки и, закатив глаза к потолку думать о вечном. Или же, играть с друзьями, рисовать картины, участвовать в соревнованиях, познавая сладость поражения и горесть победы, завоёванной чужой болью... А что для вас ОСЕНЬ?

Ваш, названный во имя самой могущественной силы, двигающей прогресс, автор

воскресенье, 16 октября 2011 г.

BIG HW

Да здравствует победитель, плачьте поверженные, но истина гласит, что первый я дерзнул вложить свой рукотворный труд на этот блог... Сей труд способен сосчитать число гигинтское, что есть 3 в степени сотой. По исполнении труд выдаёт два числа: истинное, кое и есть 3 в сотой степени, а позже пишет число, окпуглённое в типе переменных real. Вот она...

program ex1;
var a:array[1..50] of integer;
k,i,j,x,num:integer;
b:real;
begin
for i:=1 to 50 do a[i]:=0; a[50]:=1;
for j:=1 to 100 do
   begin
   x:=0;
   for i:=50 downto 1 do
      begin
      num:=a[i]*3+x;
      a[i]:=num mod 10;
      x:=num div 10;
      end;
   end;
k:=1;
while a[k]=0 do k:=k+1;
   for i:=k to 50 do write (a[i]);
   b:=1;
   for i:=1 to 100 do b:=b*3;
   writeln;
   writeln (b);
end.

P.S.: Трепещите смертные!
P.S.: Это не почерк готический, а SLACKEY, прекраснее нет которого...

Ваш, приклоняющийся перед могуществом этой программы и перед лицом её проверяющих, автор

воскресенье, 9 октября 2011 г.

HW 2

Ну наконец то...

Program my_2;
var n, n1, n2, n3, a, b, c, i : integer;
begin
     writeln ('Введите n');
     readln (n);
    n1:= n;
     d := a mod 10;
     n2 := 0;
     while n1<> 0 do
     begin
          n1 := n1 div 10;
          n2 := n2 + 1;
     end;
     a := 1;
     for i := 1 to b - 1 do
         a := a * 10;
     n3:= n div b;
    c := a*b + n mod b - a +n3;
     writeln (c);
end.

Ваш, решивший то, что нужно, автор

суббота, 8 октября 2011 г.

HW

И так домашка по информатике, задача №81, встречайте!!!

program ex81;
var n,i,n1,n2,k:integer;
begin
writeln ('n');
read (n);
n2:=n*n;
k:=0;
while (n2 div 10 <>0) do
    begin
    n1:=n2 div 10;
        if n1=7 then k:=k+1;
    n2:=n2 mod 10;
    end;
 if k=0 then writeln ('netu 7-orok') else writeln ('v kvadrate n est ',k ,' 7-orok');
 end.

Ваш, пока не понимающий 82 задачу из-за странного условия, автор

четверг, 6 октября 2011 г.

life is BIG & BAD

И вот я снова строчу, прыгая нелепыми пальцами по клавиатуре, убивая своё время и кривя спину, чтобы ВЫ могли точно также кривить спину и ПОДПЕРШИ ГОЛОВУ ЛЕВОЙ РУКОЙ читать эту мутотень.
Я заговорился. И так сейчас я, прокручивая сотый раз I WANT TO KILL EVERYBODY IN THE WORLD, строю планы по захвату мира и решая задачи по информатике. Сегодня была административка по русскому. Прибываю в гордых чувствах сам о себе (подскахавшему доброй половине нашего класса :D). И это хорошо! Я решил нарисовать шаржи на всех героев DOTA 2.
Ну держись, мой несчастный блог...


P.S.: Я наконец то вспомнил пароль от своего блога, а кол-во моих постов уже приближается к двадцать, что-то это значит >:D

Ваш, абсолютно не ленивый, в полном порядке, прибывающий в гордости сам за себя, желающий показать и вывернуть на изнанку весь свой внутренний мир, строящий безукоризненные, но несбытный планы по захвату мира, вспомнивший свой пароль (уф... устал), АВТОР,аффтар,AVATAR, и много других слов...

среда, 31 августа 2011 г.

I'm back ^^

Всё, я вернулся, я вернулся из пучин дремлющей природы, из природы, соединяющей человечество с его прошлым... Что то я заговорился ^^ Я вернулся из ДД (дача-деревня) и продолжаю вести блог. Я догадываюсь, что по мне особо никто не скучал, но всё же, следующий раз я отлучусь, ну разве что под Новый год. Вот и сейчас я прыгаю по комнате под ритмичные удары какой-то музыки, и тихо таю мысли о следующих сообщениях ( их можно прочитать тут ), гредущих довольно таки скоро. В связи с этими радующими меня проишествиями я решил сменить... ОКРАСКУ своего блога ^^  Кому не понравится идите по ссылке. До скорых встреч ^^

PS: жми на котят и позволь им захватить мир, управляя вашим мозгом. Mva-ha-ha-haha-ha...

Ваш, объединившийся с ужасным NYAN CAT, и уже наполовину управляющий вашим мозгом, автор

пятница, 24 июня 2011 г.

the LAST ONE

Итак, вот подошёл к концу учебный год. Правда он уже давно кончился, но под словом учебеый можно подразумевать весь год, проведённый в городе. Ладно, что то я много всего нагородил, и потому перейду к итогам года. За этот год я напечатал 15 сообщений ( включая это ), и надеюсь, они не остались не прочитанными. В моём, столь надоевшем всем блоге, развилось несколько направлений. Я никогда серьозно не командавал людьми. Но если, вы сейчас сидите в городе и изнываете от ой-ой-ой-не-чем-заняться-а-ещё-так-много-времени
( это болезнь такая :D), то последуйте моим советам (почему то, все любят давать слветы, а не выполнять их). Мой сайт читают 4 вида людей:

а) Филослферы (те, кого интересует философия на соём блоге, а таких мало) - друзья, почитайте что-нибудь здесь. А потом будете мне в коментах писать, этими словами :D

б) Лолеры (Игроманы и геймеры, а так же любители - те кто читают сообщения про LOL, и ругаются про себя, что я ничего не знаю и слишком многого хочу) - поиграйте в игры, это ухудшит ваше зрение и увеличит мистера G. А на самом деле в этом нет ничего страшного.
Если вы не играете в LOL, играйте во всё остальное :D

в) Учителя (вернее, один учитель, вернее, одна учительница по информатике, которая проверяет наши блоги-электронные тетради) - вам ничего посоветовать не могу, ибо вы человек взрослый и к тому же учитель, должны сами советовать и командывать учениками, а вам ещё и платить за это будут :D

г) Ничего не делающие (люди, которые просто сидят в интеренете и читающие всякую фигню) - хватит сидеть,прикрснитесь к прекрасному, посмотрев на работу моих однобложников в других сетях, таких, как :
  1. Ansel, к нему можно прекаснуться здесь, здесь, здесь, здесь, и здесь. Это его блог, он на английском и ни о чём.
  2. Jouste, к нему можно прекаснуться на его блоге, посвящённому LOL'у, а другие его адреса указанны в разделе about jouste на том же сайте.
  3. Я, ко мне модно прикоснуться здесь и здесь, а так же за деньги, по моему месту жительства :D
Ваш, на этом прощающийся, никогда не унывающий, и всегда присутствующий в ваших душах, умоляющий вас не ходить в Макдональдс, потому что это бункеры,  автор

пятница, 17 июня 2011 г.

YOU TUBE

Самый массовый видео портал, который я видел в своей жизни. Так, ссылка здесь, видео там пока нет. Я буду их сам снимать, если у кого есть что-то своё присылайте :D

понедельник, 6 июня 2011 г.

LOL

Самый первый раз я сыграл в LOL где-то месяц назад. В то время я эту игру немножко недооценивал.  Не то что бы я часто играю, но у меня уже куплены Master Yi, Trandamire, Evelin, Tvisted Fate. Это не очень дорогие, но довольно сильные герои. Как показали мои личные наблюдения - игра обладает способностью затягивать. Я не изменил своего мнения о схожести LOL и DOTA. Иногда на игроков прямо с неба падают хорошие известия: то объявили новую распродажу (новый герой продаётся по цене ниже обычной, обычно скидка 50 %), то тебе НАХАЛЯВУ дают специальные игровые деньги, или IP boosts.
Собственно, я плавно подошёл к начислению баллов и оценке проекта Leaga of Legends:

Сценарий:  Сценария, как такогого, нет. Нет и не может быть. Вся игра представляет вооружёные сражения героев из Института Войны, в который каждый пришёл сам, по собственным причинам. Конечно, у каждого героя есть своя история, но о ней мало кто задумывается. Т.Е. сценария нет.

Замысел: Замысел, мягко говоря, полностью взят из DOTA. Конечно, ходят слухи, что и DOTA и LOL создали и придумали одни и те же ребята. Тем не мение, замысел есть, но украденный :D

Графика: Здесь у создателей игры было пространство, что бы отыграться за однообразный сценарий и украденный замысел. Конечно, графике есть куда рости, в ней видны некие недоработки, но по сравнению с той же DOTA'й графика росто шикарна. У каждого персонажа много анимаций, позиций и положений. В общем, графика есть, и довольно не хилая. Она то вытягивает игру из пучины однообразия.

Геймплей: Геймплей подтормаживает, но он того стоит играется довольно весело и активно.

Общая оценка:
 Сценарий:       3/10
 Замысел:          5/10
 Графика:        10/10
 Геймплей:       9/10
 Итого          6.75/10

PS: всех прошу поиграть в игру, скачав её здесь. Или посмотреть, как играют на YOUTUBE.

четверг, 19 мая 2011 г.

Доказательство

Каждый из нас когда-либо задумывался о том, что жизнь не так уж прекрасна. Может быть это и так. Правда, если это на самом деле так, то и люди, подчинённые этой жизни, так же ужасны. А мало какой человек с лёгкостью признает, что он отвратителен. А потому, каждый, кто читал всё вышенаписанное, согласится со мной, что лучше всего замечать в жизни хорошее, а плохое пропускать и выгонять из памяти.
P.S.: все несогласные пишите в комментариях с доказательствами.

Ваш, замечающий в жизини только хорошее, автор

суббота, 7 мая 2011 г.

Binary

Вы помните 3-ю игру, которую я вам оставлял на прошлой неделе? Если помните, то непременно согласитесь с тем, что 2 планеты из Binary - это просто райский уголок. Вдохновлённый красотой, я нарисовал небольшой пейзаж во FLASH. Я надеюсь, что вы оцените. Может быть это не райский уголок во вселенной, но это место красоты, покоя и сосредоточения.


Ваш, создающий красоту, автор

пятница, 6 мая 2011 г.

Работа

Как гласит физика, работа совершается в том случае, когда мы делаем что-то активное. А вот когда мы сидим за компьютером и делаем информатику, это почему-то трудом не считается D:
Но я, не думая о последствиях, решил выложить результат моей работы с проектом №17, который гласит: напишите программу для определения положения точки на координатной плоскости: внутри заштрихованной фигуры или нет. Я пыхтел над этим минут 10. Не гарантирую, что всё правильно, но:
program abc;
   var x,y,x1,y1,x2,y2: real;
   begin
       writeln ('vvedite 2 chisla');
       readln (x,y);
          if ((y<=x+5) and (x<=0) and (x>=-5) and (y<=5) and (y>=0)) or
          ((y>=-5-x) and (y<=0) and (y>=-5) and (x>=-5) and (x<=0))
          or ((y<=sqrt(25-x*x)) and (y>=0) and (y<=5) and (x<=5) and (x>=0))
                      then
                      writeln ('da')
                      else writeln ('net');
      end.

P.S: Если кто-нибудь хочет скачать эту программу  в формате текста, пожалуйста нажмите на эту ссылку. Дорогие друзья, зачем же тратить время, чтобы нажимать Ctrl+C, а потом ещё и Ctrl+V. Просто нажмите на эту ссылку.

P.S.( настоящий P.S ): если вы нажмёте на ссылку, то узныете все мучения ада! :D

Ваш, захватывающий грешные души списывальщиков, автор

вторник, 3 мая 2011 г.

Гордость

Гордость, это когда стоишь на краю обрыва прошлого и смотришь в светлое будущее, откинув все сомнения и переживания, несмотря не на что, ты шагаешь в пропость. Некоторые делают и так. Что же до меня, то мне до обрыва ещё далеко, и я иду по цветущей поляне, так же не о чём не думая. Некоторые хотели мне сказать, что я серьёзный человек :D Раскрываю свою сущность: я маленький, беззащитный, черезвычайно креативный и даже до безумия свободный. Вот кадр из игры, в которую я советовал вам поиграть, пока меня нет :D Считайте, что это автопортрет.


Ваш, стоящий на краю обрыва и не о чём не жалеющий ни о чём, автор

суббота, 30 апреля 2011 г.

Жизнь

Жизнь... Она прекрасна, когда она есть и непостежима, загадочна и величественна, когда её нет. Жизнь нельзя тратить понапрасну, просиживать её на кресле и т.д. Именно поэтому я уезжаю завтра из города на 2 дня, а следовательно не смогу вам ничего писать. Обидно, конечно. Но может быть, даже хорошо. Поиграйте в эту игру, она поможет скоротать вам время до моего приезда. Потом в эту. Ну а если пройдёте их и заскучаете, поиграйте в это. К тому времени, когда вы поиграете во все ३ я наверное уже приеду :द

Ваш, не просиживающий штаны дома, автор

пятница, 29 апреля 2011 г.

Книга

Книга - это надежда человечества, его сила. Без знаний нас бы не было. Я представляю вам анимацию книги.
Страницы пусты. Это как свиток и Кунг-фу панда: Догадайся, мол, сам. Секретного ингридиента нет, просто анимация.
Ваш, не использующий секретных ингридиентов, автор

понедельник, 25 апреля 2011 г.

LOL

Так, я окончательно решил накопить на Jax'а. Я тут видео откопал на YouTube, наслаждайтесь. Простите, что не HD, просто HD были немного не по теме :D


Я дико обалдевал над происходящим. Краткое содержание ниже ( с комментариями )

0:18 - Jax мирно убивает миньонов около своей башни, приходит Тролль с почти полными жизнями :O, Jax расправляется с ним за 9секунд! Одними скилами и немного с бою. Тролль даже убежать не успел, Jax зажал его между др. миньонами.
0:31 - Jax просто аккуратно добивает несчастного вр. героя, срывая апплодисменты и 300G.
0:38 - Jax добивает отступающего от башни Тролля XD
0:59 - Jax реально разобрался с другим Jax'ом в лесу. Очень жестоко, слабонервным не смотреть.
1:07 - Один скил, 2 секунды, масса удовольствия, 350G и 1 убитый вражеский герой. Потом ещё и Тролля подбил, который наверное прибужал на помощь другу, не рассчитав кол-во HP.
1:24 - маленькая баталия, Jax забил тролля с полными HP :P Jax зароботал KILLING SPREE!
1:49 - пронесли вражескую Turrent, ну и собственно всё.

Ффуух, рассказал всё почти во всех подробностях.

А ещё мне очень понравилось, что Тролль всё время убегал к башне, и умирал рядом с нею :D

Ваш, восторгающийся игрой профессиональных геймеров, добивающих безныдёжных соперников у башен, автор



Рождён ползать

"Рождённый ползать, летать не может" - так гласит знаменитая пословица. Я в это не верю! Конечно, рождённый ползать не может летать, но очень хочет этого. Есть индивидумы, которые не хотят летать. Я не уважаю таких людей, т.к. у них нет цели в жизни, а это не очень хорошо. Так вот, желающие летать взлетят, но не сразу. Надо долго и упорно работать над своей мечтой, подкрепляя работу возрастающим желанием о её исполнении. Простите, меня что-то понесло :D И даже, если с первого раза полететь не получиться, это по крайней мере принесёт хоть какое-то удовольствие. Удовольствие - это признак счастья, а счастье - это ключ к исполнению всех желаний.

Ваш, ползающий в поисках своего счастья, автор

воскресенье, 24 апреля 2011 г.

LOL

Уважаемые друзья, особенно Миша Гудков и Серёга Туленко, я начал играть в LOL (обалденная стратежка реального времени) . Скажу честно я был удивлён и разочарован. Удивлён великолепной графикой и ненавязчивой красотой геймплея. Ещё порадовал огромный выбор интересных персонажей. Меня разочаровала схожесть с WC3. Ну очень похоже, просто ужас!
Общее впечатление от игры неплохое. Правда меня сразу начали выносить "слабые боты", которых поставил мой рассеянный союзник. Мне очень понравилось кастовать спелы за Мордеркайсера. Я даже не понял назначение первых двух, зато они очень быстро перезаряжаются и красиво кастуются. Только они почемуто не требуют маны, а вычитаются из здоровья. Меня это ,как сказать-то, немного шокировало. Ещё я знаю, что там есть герой Jax, носитель фонаря. Я думаю, что он очень крутой, но он стоит 6300 боевых очков :O

WARNING: это был сеанс мутотени, можете не обращать внимания.

суббота, 23 апреля 2011 г.

Герб школы будущего

Всё это конечно очень замечательно, особенно то, что я написал про "блог в развлекательных целях". Хочю вас разочаровать, это не совсем так. Дело в том, что нам в школе задали сделать герб школы будущего*. Вот я и нарисовал. Может быть и не очень красиво, угловато,  это стиль такой. Рисовал в фотошопе. Выделял угловым лассо и закрашивал области кистью. Работал на разных слоях. Сначала получился psd, а сайт такого не принимает, потому опубликовал работу немного позже, чем планировалось. Простите меня, если я так много пишу, просто с начальной школы осталась привычка - писать много и не задумываясь. Так что простите, если найдёте грамматические ошибки.Я сейчас вам и картинку покажу, и запись будет просто громадной!
* мне так сказали...
ЛАДНО, ОБЕЩАЛ КАРТИНКУ, ВЫПОЛНЯЮ!


Привет

Сначала заводишь блог! Радостный, активный такой. Потом он начинает немного надоедать, а потом и вовсе забывается и уходит в паутину интернета.
Понадеемся, что с моим блогом такого не произойдёт. Я пока что полон энергии писать всякую мутотень, и потому не буду тратить время зря. Время - деньги :D
Шлю всем большой привет!

PS: не возмущайтесь, что блог в фиолетовых тонах. Не знаю как вам, а мне фиолетовый нравится.

Я, т.е. переполненный идеями и креативом.