следующая тема »

[25 Апрель 2024, 12:49:53]

Новости, реклама:

[25 Апрель 2024, 12:49:53]

Новости, реклама:

[Toreador]

Спрашивайте про проги, задачи! Скидывайте прикольные текста по Паскалю, если не жалко!
Обсудим, поможем, расскажем!

[SAgent-RAF-]

с таким названием темы лень даже писать, кое как себя заставил   то же мне рулез  :-/

[VooDoo]

ну ёлки-палки, что вы всё на пасцал наезжаете. ну ведь надо ж начём-нить детей в школах учить. И чем он хуже тех же сей?

[UNnameD]

чем хуже C? Паскаль изначально был создан для обучения студентов...
Он менее "пластичен" и динамичен....
Да и ващё паскаль - неплохая вещь( я щас говорю о турбо паскале, а не о например обжект паскале), но сравнивать его с C всё равно, что сравнивать топор с хирургическим скальпелем...

[iced]

для обучения есть лисп. паскаль может только покалечить неокрепшие детские мозги.

[Toreador]

для обучения есть лисп. паскаль может только покалечить неокрепшие детские мозги.

На себе испробовал!?
Явно ты им так и занимался? Что так о нём думаешь!
Согласен я только с тем чё черный экран многим неприятен, но в целом с этого языка начинается всё!

[iced]

с какого языка?

[VooDoo]

да все, по крайней мере в этой стране начинали с васика а потом писали на пасике. В гродно наверное ниодной школы нету в которой си дают

[VooDoo]

кстати о прикольных текстах. Во, ловите:

program OH_TOPMO3;

uses
 CRT;

const
 MHOrO_TEKCTOB         = 15;
 nPOPEXA               = nil;

type
 A_KTO_EBO_3HAET       = (HO_KTO_TO_BEgb_3HAET, BCE_ETO_BECbMA_CTPAHHO);

 HyMEP                 = Byte;

 CTPOKA                = String[15];

 TEKCTuK               = record
                           OHA: CTPOKA;
                           TOPMO3: HyMEP;
                         end;

 TAM_ABTOMAT           = ^ABTOMAT;

 ABTOMAT               = object
                           MOE_X, MOE_Y: HyMEP;
                           TEKCTOB_BCEBO: HyMEP;
                           TEKCTbl: array[1.. MHOrO_TEKCTOB] of TEKCTuK;
                           KAKOE: HyMEP;
                           TOPMO3uM: HyMEP;
                           XPEH_EMy: TAM_ABTOMAT;

                           constructor BOT_EBOHOE_MECTO(X, Y: HyMEP);
                           procedure BOH_ETOT_XPEH(KOMy_XPEH: TAM_ABTOMAT);
                           procedure ETO_CTPOKA(OHA_CAMA: CTPOKA;
                                                EE_TOPMO3: HyMEP);
                           procedure BblBOg;
                         end;

 XMblPb                = object
                           HE_KACEKOB: A_KTO_EBO_3HAET;
                           KTO_TAM_CAMOE_TAKOE: TAM_ABTOMAT;

                           constructor Hy_HuKAK_MHE_EBO_HE_HA3BATb;
                           procedure B_nyTb;
                           procedure u_EBO_TO3E
(uMEHHO_ETO_MOXHATOE_OHO_CAMOE: TAM_ABTOMAT);
                       end;


procedure BAM_TEMHO;
begin
 ClrScr;
end;


procedure TOPMO3HyTb(CKOKO: HyMEP);
begin
 Delay(CKOKO);
end;


procedure rge_EMy_KBACuTb(EBO_X, EBO_Y: HyMEP);
begin
 GoToXY(EBO_X, EBO_Y);
end;


function WyXEP: Boolean;
begin
 WyXEP:= KeyPressed;
end;


constructor ABTOMAT. BOT_EBOHOE_MECTO(X, Y: HyMEP);
begin
 MOE_X:= X;
 MOE_Y:= Y;
 TEKCTOB_BCEBO:= 0;
 KAKOE:= 0;
 TOPMO3uM:= 0;
end;


procedure ABTOMAT. BOH_ETOT_XPEH(KOMy_XPEH: TAM_ABTOMAT);
begin
 XPEH_EMy:= KOMy_XPEH;
end;


procedure ABTOMAT. ETO_CTPOKA(OHA_CAMA: CTPOKA; EE_TOPMO3: HyMEP);
begin
 if TEKCTOB_BCEBO < MHOrO_TEKCTOB then begin
   Inc(TEKCTOB_BCEBO);
   with TEKCTbl[TEKCTOB_BCEBO] do begin
     OHA:= OHA_CAMA;
     TOPMO3:= EE_TOPMO3;
   end;
 end;
end;


procedure ABTOMAT. BblBOg;
begin
 if TEKCTOB_BCEBO > 0 then begin
   if TOPMO3uM = 0 then begin
     Inc(KAKOE);
     if KAKOE > TEKCTOB_BCEBO then KAKOE:= 1;
     rge_EMy_KBACuTb(MOE_X, MOE_Y);
     with TEKCTbl[KAKOE] do begin
        Write(OHA);
        TOPMO3uM:= TOPMO3;
     end;
   end;
   Dec(TOPMO3uM);
 end;
end;


constructor XMblPb. Hy_HuKAK_MHE_EBO_HE_HA3BATb;
begin
 KTO_TAM_CAMOE_TAKOE:= nPOPEXA;
 HE_KACEKOB:= BCE_ETO_BECbMA_CTPAHHO;
end;


procedure XMblPb. u_EBO_TO3E(uMEHHO_ETO_MOXHATOE_OHO_CAMOE: TAM_ABTOMAT);
begin
 if KTO_TAM_CAMOE_TAKOE = nPOPEXA then begin
   KTO_TAM_CAMOE_TAKOE:= uMEHHO_ETO_MOXHATOE_OHO_CAMOE;
   uMEHHO_ETO_MOXHATOE_OHO_CAMOE^. XPEH_EMy:= uMEHHO_ETO_MOXHATOE_OHO_CAMOE;
 end
 else begin
   uMEHHO_ETO_MOXHATOE_OHO_CAMOE^. XPEH_EMy:= KTO_TAM_CAMOE_TAKOE^. XPEH_EMy;
   KTO_TAM_CAMOE_TAKOE^. XPEH_EMy:= uMEHHO_ETO_MOXHATOE_OHO_CAMOE;
 end;
end;


procedure XMblPb. B_nyTb;
var
 ETOT_PAXuT: TAM_ABTOMAT;

begin
 ETOT_PAXuT:= KTO_TAM_CAMOE_TAKOE;

 while not WyXEP do
   with ETOT_PAXuT^ do begin
     BblBOg;
     ETOT_PAXuT:= XPEH_EMy;
     rge_EMy_KBACuTb(1, 10);
     TOPMO3HyTb(40);
   end;
end;


procedure BAM_XOPOWO;
begin
 BAM_TEMHO;
 WriteLN('OH TOPMO3 v1. 0  Copyright The Future Hackers, 1993');
 WriteLN('  Written by Kirill Shirokov and Dmitry Moskovich, May 93');
 WriteLN;
end;


var
 EBO_3EHKu,
 EBO_HOC,
 EBO_POT,
 EBO_XBOCT: ABTOMAT;

 KACEKOB: XMblPb;


begin
 with KACEKOB do begin
   Hy_HuKAK_MHE_EBO_HE_HA3BATb;
   with EBO_3EHKu do begin
     BOT_EBOHOE_MECTO(1, 1);
     ETO_CTPOKA('-  -', 20);
     ETO_CTPOKA('o  o', 3);
     ETO_CTPOKA('O  O', 16);
     ETO_CTPOKA('0  0', 23);
     ETO_CTPOKA('O  O', 14);
     ETO_CTPOKA('o  o', 5);
   end;
   u_EBO_TO3E(@EBO_3EHKu);

   with EBO_HOC do begin
     BOT_EBOHOE_MECTO(1, 2);
     ETO_CTPOKA('.. ', 21);
     ETO_CTPOKA(' oo ', 16);
   end;
   u_EBO_TO3E(@EBO_HOC);

   with EBO_POT do begin
     BOT_EBOHOE_MECTO(1, 3);
     ETO_CTPOKA(' -- ', 22);
     ETO_CTPOKA(' == ', 4);
     ETO_CTPOKA('-==-', 6);
     ETO_CTPOKA('/--\', 19);
     ETO_CTPOKA('-!! -', 16);
     ETO_CTPOKA('\==/', 21);
     ETO_CTPOKA('-!! -', 3);
   end;
   u_EBO_TO3E(@EBO_POT);

   BAM_TEMHO;
   B_nyTb;
   BAM_XOPOWO;
 end;
end.

[Toreador]

с какого языка?

Ты попал не на ту тему?
:-/

[iced]

у меня был basic, c, c++, pascal - в этом порядке.

[VooDoo]

у меня был basic, c, c++, pascal - в этом порядке.

бред, после всех наследований, полиморфизмов, перегрузок и всякой прочей шняги давать паскаль? зачем? наверное просто что в программе написано, что бы дети знали паскаль

[Toreador]

кстати о прикольных текстах. Во, ловите:

program OH_TOPMO3;
[snip by x-penguin]
.....

---------------------------------------
По тексту вижу прикольная прога!
Скоро свою кину!.......

[Toreador]

 
ВОТ ТАКАЯ ВОТ ПРОГА!!!
-----------------------------------------


{COPYRIGHT 2005 ©! THIS PROGRAMM CREATED BY TORE@DOR!}
(*ВЕЗЕНИЁ or ИнТУИциЯ*)
{YoU INTYISHEN}

uses crt;
label nach;
var o,s,r,i,p,j:integer;

procedure vverh;
begin
textbackground(4);
 textcolor(white);
clrscr;
 writeln('-------------------------------------------------------------------------------');
 writeln('':30,'ТВОЁ ВЕЗЕНИЕ');
 writeln('-------------------------------------------------------------------------------');
end;

procedure poka;
begin
 clrscr;
  writeln('-------------------------------------------------------------------------------');
  writeln('':30,'СПАСИБО ЗА ИСПОЛЬЗОВАНИЕ');
  writeln('-------------------------------------------------------------------------------');
  writeln('':492,'COPYRIGHT 2005 ©! THIS PROGRAMM CREATED BY TORE@DOR!');
   writeln; writeln; writeln;
   writeln('':24,'ВАШЕ ВЕЗЕНИЕ(ИНТУИЦИЯ) СОСТАВЛЯЕТ: ',i,'%');
 readln;
end;

procedure los;
begin
 vverh;
  for j:=1 to 70 do
 write('':15,'GAME OVER':3);
  readln;
   i:=0;
 poka;
end;

procedure win;
begin
  vverh;
 for j:=1 to 20 do
writeln('':25,'YOU WIN!');
end;

begin
nach:
vverh;
write('ПРЕДЕЛЫ ЧИСЕЛ:'); readln(s);
if (s<3) or (s>100) then begin writeln('A ЛЕГКО НЕ БУДЕТ?');
readln; goto nach; end;
write('ВВЕДИ ЛЮБОЕ ЧИСЛО:'); readln(o);
if (o>s) then goto nach;
 randomize;
 r:=random(s);
  writeln('КОМПЬЮТЕР ВЫБРАЛ: ',r);
if (o=r) then i:=i+14+r
else
if (i>=9) then i:=i-10 else i:=i-1;
if (i>=0) and (i<92) then writeln('ВАША УДАЧА СОСТАВЛЯЕТ: ',i,'%')
else if (i>=-15) then writeln('МОЖЕТ ВЫ ЕЩЁ НЕ ЗАДУМЫВАЛИСЬ ОБ ЭТОМ - НО ВЫ НЕУДАЧНИК (НИЦА)!  (',i,')')
 else if (i<=-15) then los;
if (i>=92) then win;
readln;
repeat
vverh;
writeln;
writeln('':30,'ЕЩЁ РАЗОК?');
writeln('"1" - ДА, ЕЩЁ!          "2" - НЕТ! УЖЕ ХВАТИТ');
readln(p);
until (p=1) or (p=2);
if (p=1) then goto nach else poka;
end.

[iced]

а кто тебе сказал что я в школе или там в универе учил?

[Toreador]

а кто тебе сказал что я в школе или там в универе учил?

Так ты вообще самоучка? [smiley=1.gif]

[iced]

нет

[Toreador]

нет

Возникает ещё один вопрос - Ты вообще паскаль знаешь?

[iced]

уже наверное нет.

[Toreador]

уже наверное нет.

Возможно ты и не знал! Ты не задумывался об этом?
Попробуй поучить,... возьми умные книги и т.п.
----

[iced]

1. знал
2. зачем оно мне надо
3. умные книги по паскалю? ;]

[LamMeR]

IceD когда-то знал паскаль. ведь дипломы на респе брал ну а без знания языка это никак  

другое дело, что теперь он типа подрос, и вот уже как большой(в смысле взрослый) и крутой программер гонит на все, что теперь не использует.

я теперь тоже не фанат паскаля, но все же ему нужно отдать должное, ведь начиналось все с него.

[iced]

>IceD когда-то знал паскаль. ведь дипломы на респе брал

не дипломы а асболютные первые места :]]]

>ну а без знания языка это никак

ну последнюю республику я таки хотел на с++ писать - но не дали - у них компилера не оказалось :]

>другое дело, что теперь он типа подрос, и вот уже как большой(в смысле взрослый) и крутой программер гонит на все, что теперь не использует.

не на всё. в основном на дельфю и иногда на жабку.

>я теперь тоже не фанат паскаля, но все же ему нужно отдать должное, ведь начиналось все с него.

неа - с васика и зх ассемблера.

[iced]

>и вот уже как большой

`старый и больной` (ц)

[LamMeR]

>IceD когда-то знал паскаль. ведь дипломы на респе брал

не дипломы а асболютные первые места :]]]

абсолютное первые-это тоже дипломы

>я теперь тоже не фанат паскаля, но все же ему нужно отдать должное, ведь начиналось все с него.

неа - с васика и зх ассемблера.

у кого как, у меня с паскаля

[VooDoo]

Я начинал с васика, ну если это можно назвать началом. Просто где-то в 6 классе нам давали книжку и мы от-туда набирали проги. Конечно же Пётр Владиславович нам что-то объяснял, но кто ж его слушал в 6 классе, нам играться была охота. А потом уже в 9 и дальше был паскаль. Так что нормальное начало было с паскаля и большое ему за это спасибо

[Mишкa (Phantom)]

Паскаль и Васик это основа.

Многие конечно же могут возразить....но это просто мое личное мнение.

Паскаль это классика, кто бы что ни говорил. До сих пор риходится с ним сталкиваться, вспоминать то, что когда-то помнил очень хорошо.

:-)

[Dark Side]

Вообще-то основа- это Assembler!!!

[Dark Side]

Тем не менее без Пасцаля в Делфях нечего ловить!!!
Всё чаще замечаю, что мыслю вне языков программирования. А вообще С++ изящней Пасаля.
И синтаксис более свободный, рекомендую.

[iced]

Тем не менее без Пасцаля в Делфях нечего ловить!!!

ну и хорошо. нафиг они нуны то?

[iced]

Вообще-то основа- это Assembler!!!

да?

[VooDoo]

началось уже : "Кому вообще делфа нужна?". Да ведь кому как удобнее, тот на том и пишет. А если заказчик требует именно делфу? а то, что сишка красивее паскаля, так ведь никто и не спорит, язык конечно классный, но Java красивее

[DeleteR]

IceD так может назовешь свое реальное имя... Все будут знать такого крутого перца как ты!

[RILLey_ELf]

ой ребята - все мы конечно пальца гнём (в сторону Deletera)
но по моему - все эти левые понты - си круче асм енто начало не в тему
ну причём здесь си или асм.
человеку нравится простой понятный и способные выполнить все его потребности язык - так на...зачем ему копаться в дебрях сишки (которая массив от -100 до 100 создать не может  )

[DeleteR]

ой ребята - все мы конечно пальца гнём (в сторону Deletera)
но по моему - все эти левые понты - си круче асм енто начало не в тему
ну причём здесь си или асм.
человеку нравится простой понятный и способные выполнить все его потребности язык - так на...зачем ему копаться в дебрях сишки (которая массив от -100 до 100 создать не может  )

Не понял, а я тут причем!!! Мне просто интересно стало и все! И нифига я пальцы не гнул... Вот...

[Dark Side]

Вообще, если секёшь не имеет значения на чём писать. Язык программирования- всего лишь средство...

[iced]

как так не имеет значения? ага. если умеешь водить машину - то пофиг на чём ездить - хоть на запоре, хоть на бмв.

[паткатRON]

паскаль рецпект хотя я в нём мало секу!!! хочеться побольше поработать в нём но не магу найти!! при последнем форматированиии веника пропал!!!

[2good4u]

Паскаль - бред! Проще Дэлфа, да и возможностей куда больше...

[iddqd]

можно мне тоже высказаться? ато начнуться "пальцы и т.д." короче, кто нить может мне назвать !!!УСПЕШНЫЙ!!! комерческий проект, написанный на пасике за последние 5 лет? Конечно в образовательных целях пасик рулит однозначно у нас в ГрГУ, хотя мне кажется, что это просто традиция, которую никто менять не  хочет. таже сишка (без плюс плюс) не тяжелее для понимания новичка, чем пас. да и вообще, важен не язык, а алгоритмы, так что все усердно читаем Кнутта.

[7floor]

можно мне тоже высказаться? ато начнуться "пальцы и т.д." короче, кто нить может мне назвать !!!УСПЕШНЫЙ!!! комерческий проект, написанный на пасике за последние 5 лет? Конечно в образовательных целях пасик рулит однозначно у нас в ГрГУ, хотя мне кажется, что это просто традиция, которую никто менять не  хочет. таже сишка (без плюс плюс) не тяжелее для понимания новичка, чем пас. да и вообще, важен не язык, а алгоритмы, так что все усердно читаем Кнутта.

Тебе работа не нужна? А то мы периодически расширяемся... Delphi + MSSQL вот уже 6 лет. Офигенно успешный проект. Правда, что за он, узнаешь, лишь будучи нашим сотрудником.

[iddqd]

Тебе работа не нужна? А то мы периодически расширяемся... Delphi + MSSQL вот уже 6 лет. Офигенно успешный проект. Правда, что за он, узнаешь, лишь будучи нашим сотрудником.

нужна, однако жаль, что я сейчас приблизиетльно за 1370 километров от Гродно. Народ, если бы вы сейчас были студентами 2 курса ГрГУ специальности ПОИТ, то глубоко уважаемый К.А.М. (ну далжны знать наверное) доходчиво всем бы разницу между Дельфей и Паскалем объяснил. Дельфи - среда разработки, основой которой является язык Object Pascal. Честно, я достаточно проработал с дельфи, и не по наслышке знаю все ее глюки. И еще я вам честно скажу: покрйней мере в Германии, просматиривая предложения о работе, я ни разу не встречал, что бы кто-то  искал программистов со знанием дельфи. Вообще против этого тандема (Дельфи + Паскаль) я ничего против не имею, но просто мой совет: с ней (Дельфёй) вы далеко не уедете.

[7floor]

Студентом я был ой как давно. Не стоит умничать, используя слова "доходчиво", и заострять внимание на разнице между дельфи и паскалем. Потому что, во-первых, я и сам могу доходчиво это объяснить, а во-вторых, здесь говорится о паскале, а паскаль (эволюционировавший object pascal) является единственным языком программирования в среде разработки дельфи до версии 2005 (в 2005 он не единственный). А то, что мы делаем на работе, вообще не визуально, так что я могу полноправно говорить, что мы пишем на объектном паскале.

Далее - в принципе, человек, умеющий писать только на одном определенном языке программирования - не программист, а кодер. Если ты - программист, то нет особой разницы, на чем реализовывать те или иные алгоритмы. Вопрос синтаксиса, платформы. Не принципиально.

[iddqd]

короче спорить и флудить прекращаю, если никто не забыл, то тема была вот такая:

Спрашивайте про проги, задачи! Скидывайте прикольные текста по Паскалю, если не жалко!
Обсудим, поможем, расскажем!

прошу прощения, если кого обидел!  

[iddqd]

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

2 Деус4х6: парниша, ёпт, ты че с бобруйска? сказал же, кончаем с этим, ничего конкретно личного против дельфи не имею, одного года ежедневного общения с ней мне хватило и ваще тема то совсем другая. Не, надо бля поумничать, надо показать какой ты кульный чел в дельфе , как ты знаешь как борланд свои творения называет и т.д. и т.п. понимаешь дружище,  мои "ограниченные субъективные ощущения" ничем от твоих то и не отличаются, только я признаю другие точки зрения, и пытаюсь что-то посоветовать, отталкиваясь не только от "сам себе хозяин" и "делаю что хочу", но и от других тенденций, которые  тем, "кого и тут хорошо кормят" явно не просвечиваются. Сбацай отдельный топик, и там мычи, как на дельфе писать рульно, а тут народ совсем другие темы по идее обсуждать должен.

все, не по теме писать перестаю.

[kaa]

Не тот ли это Деним, который со мной в одном классе учился в СШ-лицей 1? Ну а насчёт паскаля могу сказать, что язык не сильно клёвый в том плане, что долго на нём проекты писать... есть там ньюансы... Предпочтительней в этом плане С++. Да и не под все платформы скомпилировать можно...

[Shura]

О чем спор господа, программисты?
Каждый выбирает то что ему нравится. Нравится дельфи - на здоровье, не нравиться - тоже на здоровье. Могу только посоветовать для разнообразия написать несколько пректов на других языках программирования. До того как я писал только на дельфи у меня был взгляд примерно как и у теперешних сторонников дельфи. Как только узнал что-то другое, то мое мнение в корне изменилось, и про дельфи уже успел забыть. Так что благо выбор и альтернативы есть, и выучить другой язык будет полезно не только для сравнения, но и для общего развития. В данный момент дельфи далеко не на пике популярности.

[ItsI]

Паскаль язык для обучения программированию и алгоритмизации! На сегоднешний день ни капли больше!

[7floor]

Паскаль язык для обучения программированию и алгоритмизации! На сегоднешний день ни капли больше!

Маловато восклицательных знаков!!! Неубедительно звучит!!!!!


ЗЫ. На чем пишем-с? Скока проектофф уже в багаже? Что еще слышали о паскале?

[VooDoo]

Вот уж развели демагогию. Вечно все спорят, что круче. Да какая разница! В Минске есть контора, "ТетраСофт" называется так они вообще на FoxPro пишут да ещё под досю, деньги заколачивают и всему рады.

[iddqd]

ну так мот специфика такая... к примеру, для техже банков, у них уже все написано 5 лет назад, и нужно еще что-то туда добавить, вот и клепают они под дос. но прикол в том, что это уже скорее сопровождение, чем разроботка

[iced]

На счет платформ - согласен

а что насчёт платформ? есть фрипаскаль.

[Fastman]

Народ... Ну что вы тут цапаетесь. Я лично знаю людей которые на делфе сотворят вещи которые я даже не знаю как на С++ реализовать, и это не потому что я тупой, а потому что нет предела совершенству.. Вывод какой чувствуете Каждый курит то что его вставляет !!! Да, каждый выбирает свой путь, но вот я вам скажу абсолютно точно что есть за бугром конторы которые на Фортране делают софт Я вот знаю видел и работал с Visual Fortran..а вы Вряд ли.. НО я не лезу и не ору на весь форум FOPRTRAN RULEZ !!!!! Поэтому  все по 0.5 пива..улыбнуться и не портить друг другу нервы

[Sussanin]

а что насчёт платформ? есть фрипаскаль.

И Kylix...
ЗЫ Между прочим, сейчас 2к5 год... Дельфа 7 вышла вроде 4 года назад... т.е. уже 4 года среда разработки Delphi (и Kylix) юзает язык программирования Delphi, а не Object Pascal...

[Shorty]

Я лично не вижу смысла загоняться каким либо одним ЯП. Нужно пользоваться тем, что подходит к данной конкретной задаче. Паскаль имхо идеально подходит для обучения студентов ))

[iced]

Паскаль имхо идеально подходит для обучения студентов

а толку учить то что непригодно для использования в реальной жизни.

игрушечные пистолеты идеально подходят для обучения стрельбе... ;]

[Shorty]

а толку учить то что непригодно для использования в реальной жизни.

игрушечные пистолеты идеально подходят для обучения стрельбе... ;]

Ну дык )) На игрушечных пистолетиках детишки учатся нажимать на курок и направлять ствол в правильную сторону. Студенты с помощью паскаля делают тоже самое

[iced]

:]

[kaa]

Паскаль клёво подходит для изучения методов алгоритмизации. Не надо заморачиваться на всяких фишка, которые можно делать в том же C++. Я кста до сих пор на студенческих ACM олимпиадах на delphi программлю

[iced]

а на асме дельфи оставили? вроде были разговоры что выкидывают...

[kaa]

Хм... честно говоря не слышал такого По крайней мере в прошлом году писал на delphi

[Neo]

Ну дык )) На игрушечных пистолетиках детишки учатся нажимать на курок и направлять ствол в правильную сторону. Студенты с помощью паскаля делают тоже самое

Только что-то не все попадают в свою мишень

[iced]

ну и хрен с ним (разговоры были года 4 назад).

[kaa]

Хех. Ну 4 года назад я ещё в школе учился я тогда в 11-м классе занят 1-е место среди студентов ГрГУ   Только вот никуда мы не поехали Видимо не было рассчитано, что школьники могут победить.... Хотя пришло персональное приглашение команды нашей на олимпиаду школьную в питер, но опять же у государства не нашлось денег... (
P.S. А в питере я до сих по не побывал

[iced]

та знаю я где и когда ты учился ;]

[Toreador]

Так значит на мою тему слетелись самые злобные программеры Белоруси???
Забовно, неожидал!
Так Вы ещё не пришли к выводу:"Паскаль - это хорошо или плохо?"
....

[iced]

хм - а какое отношение олимпиадки имеют к программированию?

[Toreador]

хм - а какое отношение олимпиадки имеют к программированию?

Ну как я понял, он занял 1-ое место не по физике, и не по математике, а по программированию!. [smiley=1.gif]

[iced]

ну и? я в школьных по программированию первое на республике в своё время взял. это никоим образом не сделало меня программистом.

[Toreador]

ну и? я в школьных по программированию первое на республике в своё время взял. это никоим образом не сделало меня программистом.

Знаешь? Программист понятие расстяжимое! Возможно ты не задумывался об этом!

[iced]

куда оно растяжимое?

[Toreador]

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

[iced]

где я такое говорил? я на олимпиады угробил (ну не то что бы угробил вообще говоря - потратил) четыре года. постоянные сборы и всё такое. и я действительно разбирался в олимпиадных задачках (ну то самое первое на республике + серебро с межнара о чём-то говорит ;]). поэтому я могу говорить объективно - олимпиадные задачки к программированию не имеют никакого отношения.

[iced]

наша система образования (особенно в ИТ области) давно умерла, сгнила и истлела. это факт.

[kaa]

хм... IceD.... А мы знакомы ? Ты случаем не панком будешь ?  

[iced]

гы ;] давно мну так не называли...

мог бы у квы спросить.

[kaa]

Хе хе Ну привет... ) Но думаю по теме ты со мной согласишься, что как язык программирования Pascal уступает действительно нормальным объектно ориентированным языкам (object pascal я за нормальный честное слово не считаю , не в обиду сказано любителям поизвращаться  ). Но в то же время на нём действительно клёво начинать изучать методы алгоритмизации....

[iced]

эээ - для начала назови хоть один полностью ОО язык (ну это так - маленький тестик).

и я всё равно не соглашусь что паскаль подходит хоть для чего нибудь.

[kaa]

2 Deus6666: геморно... когда код разрастается до больших размеров - он становится нечитабельным.... Соответственно, небольшое изменение придётся делать с большими затратами времени.

[iced]

читаем внимательно - `полностью ОО язык` ;]

2 Deus6666: геморно... когда код разрастается до больших размеров - он становится нечитабельным.... Соответственно, небольшое изменение придётся делать с большими затратами времени.

ты хотел сказать немаинтабельным ;] а так верно.

[iced]

ну я учавствовал в _больших_ проектах (не на дельфях).

и я видел несколько средних проектов на дельфях (и в одном учавствовал). больше к дельфям не подхожу.

[ancestor::]

2 Deus6666: геморно... когда код разрастается до больших размеров - он становится нечитабельным.... Соответственно, небольшое изменение придётся делать с большими затратами времени.

Бррр... Код, который тяжело сопровождать,  написать можно на любом языке.
Так же как и на любом можно написать код, который потом будет нормально сопровождаться/изменяться.
Дело в подходе к творчеству  

[kaa]

2 Deus6666: есть немного   Я счас лид программер на проектах в одной компании....

[iced]

2kaa: я очень сильно подозреваю в какой и очень сильно сомневаюсь что у вас там _большие_ проекты.

[iced]

Проект был больше миллиона строк? На делфи пишутся и ведутся проекты больше миллиона строк.  Может дело всё таки не в делфи, а в чьих-то кривых руках?

больше, больше. причём руками писанных. а ты в своём махаоне считал только писанный код или генерённый тоже?

[kaa]

2 IceD: Да. Проекты у нас среднинькие. Но если бы они были написаны на языке типа делфи, то мы бы точно по срокам не вкладывались

[iced]

то есть генерилка нагенерила где то 80% кода ;]

[kaa]

2 Deus6666: игры для мобильных телефонов

[iced]

хм. может мну в простенькой кутешной прожке посчитать колво кода в qt и объявить прожку гигантской?

[iced]

p.s. народ в России ведет проекты, писанные полностью с нуля и руками свыше миллиона строк. На Делфи.

бедняжки...

[iced]

привезите мну ключик и софт - потыркаюсь. ехать куда либо (а так же коннектиццо на вентовз по rdc) мну лень.

[iced]

позвони - договоримся.

[Артист]

Народ помогите!!! Надо срочно решить задачу:
Вокруг сидит k мышей, а в ценре кот(кошка- кому как нравиться:), и поедает каждую n-ную.Нужно узнать мышь под каким номером он съест последней.
Очень нада.заранее благодарю.

[iced]

2MAN: а в чём вопрос - берёшь и пишешь.

[7floor]

Хоть бы сказал, на чем задачку делать :-) Судя по теме, то вроде как на паскале, короче:

Код:

program CatMices;

{$APPTYPE CONSOLE}

var
  k, n: Integer;
  Mices: array[1..100] of Boolean;
  MouseIndex, MouseCounter, MicesLeft: integer;

begin
  Write('Enter k (k <= 100): ');
  ReadLn(k);
  Write('Enter n: ');
  ReadLn(n);

  for MouseIndex := 1 to k do
    Mices[MouseIndex] := True;

  MicesLeft := k;
  MouseIndex := 0;
  while MicesLeft > 0 do begin
    MouseCounter := 0;
    while MouseCounter < n do begin
      MouseIndex := MouseIndex + 1;
      if MouseIndex > k then
        MouseIndex := 1;
      if Mices[MouseIndex] then
        MouseCounter := MouseCounter + 1;
    end;
    Mices[MouseIndex] := False;
    MicesLeft := MicesLeft - 1;
  end;

  WriteLn('Last mouse was ', MouseIndex);
  ReadLn;
end.

Писалось на делфи, но использовался тут только чистый паскаль, кроме камента {$APPTYPE CONSOLE}. Из соображений "образовательности" задачки не юзалось никаких наворотов типа динамических списков еще чего (хотя можно было сделать покрасивше :-) ). Даже массив не динамический. А так, дубово, как и все задачки такого типа.

[iced]

27floor: мона было и короче немного записать

а вот теперь вопрос - а слабо f(n, k) выписать?

[7floor]

За краткостью даже не пытался гнаться, я писал, как нагляднее, а не как оптимальнее или короче.

Имеешь в виду решить задачу не алгоритмически? То есть, не поедая мышей, сразу сказать, кто последний?

[lotas]

эта задача, как сейчас помню решалась на 1м курсе в теме "Стэк, очередь, ...."
так тут и есть как раз очередь (можно односвязная)
... ну и дальше по плану....

[iced]

если найду записки со сборов - то возможно формулу запостю.

[kaa]

Задачка решалась формулой, насколько я помню. Если не ошибаюсь, то её решали с IceD, когда он сборы вёл Но вот в упор не помню решения...

[iced]

2kaa - теже яйца ;]

[ErEpb]

Короч задача:
Задана двумя точками прямая . Найти серединный перпендикуляр к этой прямой. Мож хто подскажите как решить.

[ErEpb]

Короч задача:
Задана двумя точками прямая . Найти серединный перпендикуляр к этой прямой. Мож хто подскажите как решить.

[ZaiC3k]

Короч задача:
Задана двумя точками прямая . Найти серединный перпендикуляр к этой прямой. Мож хто подскажите как решить.

искать похоже надо серединный перпендикуляр к отрезку прямой
для начала составь уравнение нормального вектора для прямой,а уж найдя координаты середины отрезка и имея нормальный вектор к прямой, содержащей отрезок, составляй уравнение серединного перпендикуляра

[intro]

Дано число в K-ичной системе счисления an an-1 ...a0 (K<=36).
Найти остаток от деления его на m.
Числа K, n, m, как и остаток от деления на m, представляются в десятичной системе счисления.


Данные N косточек домино по правилам игры выкладываются в прямую цепочку, начиная с косточки, выбранной произвольно,в оба конца до тех пор, пока это возможно. Построить алгоритм, позволяющий определить такой вариант выкладывания заданных косточек, при котором к моменту, когда цепочка не может быть продолжена, "на руках" останется максимальное число очков.

[dragoon6]

to ZaiC3k: Вообщенто задача ErEpbя звучит немного по-другому, но это единственная подзадача, которую мы не можем решить. Я вообще пишу в основном переборные задачи, а не геометрические, и ещё ни разу не пользовался вектором, и потому не знаю решения энтой задачи. А если взять более большой кусок задачи, то нам надо построить окружность по трём точкам, лежащим на окружности. Мот есть какой-нибудь другой способ решения этого??? :-/

[ZaiC3k]

to ZaiC3k: Вообщенто задача ErEpbя звучит немного по-другому, но это единственная подзадача, которую мы не можем решить. Я вообще пишу в основном переборные задачи, а не геометрические, и ещё ни разу не пользовался вектором, и потому не знаю решения энтой задачи. А если взять более большой кусок задачи, то нам надо построить окружность по трём точкам, лежащим на окружности. Мот есть какой-нибудь другой способ решения этого??? :-/

ну конечно же есть
надо фсеголишь найти координаты центра и радиус
тока раскажу как это сделать завтра - ибо сегодня раб. день заканчивается и надо бежать

(и это - вот - к паскалю задача никакого отношения не имет кстати)

[ZaiC3k]

ИТАК
имеется ур-ние окружности (общее):
(x-o.x)^2+(y-o.y)^2=r^2, где o.x и o.y - координаты x и y центра окружности ( О)
подставь координаты известных точек принадлежащих окружности и получишь систему из 3-х уравнений с 3-я неизвестными o.x, o.y и r

[dragoon6]

to intro: ну и чего с первой задачей, сложно что-ли перевести чисто в десятичную сис-му счисления? Вот вторая задачка посложнее, можно будет как-нибудь с ней пое#.....

to ZaiC3k: к паскалю эта задача имеет самое прямое отношение, т.к. мне её надо реализовать на этой ДОЛБАНОЙ СРЕДЕ ПРОГРАМИРОВАНИЯ!!!(turbo pascal). Мне, кстати, оч. интерестно узнать, как можно решать сис-мы уравнения в PASе. И ещё оч. хочется узнать, как в сообщение на форуме вставлять цитаты(мот объяснишь, а)...

[ZaiC3k]

Мне, кстати, оч. интерестно узнать, как можно решать сис-мы уравнения в PASе. И ещё оч. хочется узнать, как в сообщение на форуме вставлять цитаты(мот объяснишь, а)...

в данном случае не важно на каком языке ты будешь решать эту задачу - везде алгоритм будет выгляжеть одинаково
для решения систем ур-ний можно применять фсякие хитрые методы про которые в книжках пишут, но в данном случае проще решить ее руками на бумажке и получить готовые формулы для r, o.x и o.y - главное не лениться; а еще можно поискать в нете как люди решали подобные задачи - я почему-то уверен что такого рода примеры должны быть
ИЛИ ТЫ ХОЧЕШЬ ЧТО БЫ Я ЗА ТЕБЯ СЕЛ И ФСЕ ПОСЧИТАЛ ИЛИ НАШЕЛ?

а цитаты можно фставлять либо нажимая на кнопку "Цетировать", либо руками аисать ТЭГ quote в квадратных скобках (открывающий и закрывающий)

[dragoon6]

Ну, насчёт одинакового алгоритма - эт верно, вообще я искал по нету решение вот этого, но есть решение ни С++ и я его понять не могу... Били там ещё темы... Типа эта фишка MINDISKом называется... Вот только исходника, которого я бы смог понять, я не нашел... А способы, как там описывается его построение такие....(Ну, например, что-то вроде берём произвольную окружность...  :-/ Если все точки попадают в неё, то пытаемся уменьшить... иначе увеличиваем....) По-мойму это тупо.... А вообще, попробую формулы повыводить, мот чё-нибуть получаться (надеюсь, системы уравнений (да ещё с ТРЕМЯ неизвестными) я как-то не очень... :-/)... :-/
P.S. и, кстати, цитировать, а не "це"... ни в обиду... люблю я людей попраб##ть, особенно в написании слов, хотя и сам русским языком плохо владею...  

[ZaiC3k]

посмотрел я что там за "MINDISK"
там решается совершенно другая задача и MINDISKом называется одна из процедур
вот том алгоритме есть как раз таки процедура построения окружности по 3-м точкам - в которой есть готовые ф-лы для o.x o.y и r - надо только повнимательнее  прочитать и разобраться в Си - НО ЛУТШЕ ВЫВЕСТИ САМОМУ - на фсю жизнь запомнятся

[dragoon6]

to ZaiC3k: Ладно, псиба, дальша кк-будь сам... Фсё-тки надо же когда-будь што-будь вывести самому... Гы...

[Toreador]

НАРОД ПРОГРАММИСТОВ ВСЕХ С НОВЫМ ГОДОМ!!!
ОТРЫВАЙТЕСЬ ОТ КОМПОВ И ВСЕ НА ЕЛКУ...

 

[VooDoo]

Короч задача:
Задана двумя точками прямая . Найти серединный перпендикуляр к этой прямой. Мож хто подскажите как решить.

вся геометрия отлична написана в учебнике Котов "Методы программирования" 9 вроде класс. Там Есть всё

[Toreador]

Ну чё решили?

[Sussanin]

Да Егерь к области готовился, олимпиада уже прошла...

[iced]

to intro: ну и чего с первой задачей, сложно что-ли перевести чисто в десятичную сис-му счисления? Вот вторая задачка посложнее, можно будет как-нибудь с ней пое#.....

угу. тока задачка то олимпиадная. чило в 25ричной системе - GFGHFHG9068965895895489589589589589549874GFDDFGFFGGFGF ... <skipped> .. GHGGHGH. переводи давай.

[dragoon6]

Короч задача:
Задана двумя точками прямая . Найти серединный перпендикуляр к этой прямой. Мож хто подскажите как решить.

вся геометрия отлична написана в учебнике Котов "Методы программирования" 9 вроде класс. Там Есть всё

Короч, слуш... ДА ПОШЁЛ ЭТОТ КОТОВ ОНЧЕНЬ ДАЛЕКО!!! В нём почти везде есть ошибки, опечатки и прочая ......
to Susanin:
Он теперь ещё и к репе готовиться будет... Туда он попал на 95%... (только сборы отборочне пройти и не взять последнее...)
to IceD:
я его тебе переведу, причём и не такая уж проблема (фсего-лишь длинная арифметика...) А по поводу олимпиадной задачки... в общем область.... я взял 1-ое абсалютнае...

[iced]

нууу давайте хвастаться. а я республику брал первое абсолютное ;] и серебро с межнара ;]]]

Короч, слуш... ДА ПОШЁЛ ЭТОТ КОТОВ ОНЧЕНЬ ДАЛЕКО!!! В нём почти везде есть ошибки, опечатки и прочая ......

а по сопатке?

[dragoon6]

нууу давайте хвастаться. а я республику брал первое абсолютное ;] и серебро с межнара ;]]]

Если эт правда, то ты-реальный чел....

Короч, слуш... ДА ПОШЁЛ ЭТОТ КОТОВ ОНЧЕНЬ ДАЛЕКО!!! В нём почти везде есть ошибки, опечатки и прочая ......

Это лично моё мнение.....

[iced]

правда, правда. 98ой год.

[dragoon6]

Повторить бы мну тебя.... Да вот только я думаю, а репе мну больш 3-го диплома не светит...

[iced]

это потому что на котова ругаешься ;]]

вот я ему ещё фразу эту передам ;]]]]]

btw - а котов школьными ещё занимается?

[VooDoo]

Не надо гнать на Котова!!!!

[dragoon6]

Знач так... насчёт опечаток... та же геометрия.... 9 класс.... чтот вроде А1В2-А2В1/.... в общем, пришлось немного переделывать... потом, говорят, там кучи неправильно (с ошибкой) написаны+ qsort.... :-/

[iced]

ну дык это же хорошо - есть простор для творчества ;]

[LamMeR]

Повторить бы мну тебя.... Да вот только я думаю, а репе мну больш 3-го диплома не светит...

тебе бы еще сборы пройти, да на респу попасть

[iced]

а на сборах сейчас отсеивают? раньше такого не было.

мну помниццо пытались отсяеть на сборах на межнар по причине антисоциального поведения, но это немного другое.

[LamMeR]

а на сборах сейчас отсеивают? раньше такого не было.

мну помниццо пытались отсяеть на сборах на межнар по причине антисоциального поведения, но это немного другое.

отсеивают-отсеивают... но правда не сильно, но все же...

[dragoon6]

to LamMeR:
Ты ж знаеш, што ничего не знаешь... Блин, раз знаешь про отсев, то знал-бы всё... Короч, первое место идёт вне конкурса (т.е. мне как-то на первые сборы.....).
Кстать, я б не сказал, што не сильно.... 11-е классы идут фсего один-три чел-ка, а 10 + 9 - фсе астальные....(фсего-15 чел-к, хтя, по-мойму в прошлом году поехало 16...). В общем, не сильно отсеивают 9 и 10 классы... А 10-ая парралель щас, блин, сильная попалась (ср. бал по области 11 классов - 60-70 по мойму, а 10 - 108 +- 1) :-/

[dragoon6]

и ещё раз to LamMeR:
Кстати, в прошлом году на студенческой олимпиаде была одна команда, она Lammerz по-мойму называлась... Так вот, ты случайно в её состав не входил?

[LamMeR]

to LamMeR:
Ты ж знаеш, што ничего не знаешь... Блин, раз знаешь про отсев, то знал-бы всё... Короч, первое место идёт вне конкурса (т.е. мне как-то на первые сборы.....).
Кстать, я б не сказал, што не сильно.... 11-е классы идут фсего один-три чел-ка, а 10 + 9 - фсе астальные....(фсего-15 чел-к, хтя, по-мойму в прошлом году поехало 16...). В общем, не сильно отсеивают 9 и 10 классы... А 10-ая парралель щас, блин, сильная попалась (ср. бал по области 11 классов - 60-70 по мойму, а 10 - 108 +- 1) :-/

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

область в этом году - это большая случайность она не отразила силу участников, по крайней мере в 11 и 10 классах, в 9 -х там все норамльно. по моему мнению, в 11-х самый сильный Матюк Дмитрий, в 10-Быль Василий, но это мое скромное мнение, ну а правду покажут сборы, ты со мной согласен???

[dragoon6]

По поводу силы участников - я с твоим мнением согласен (насчёт Матюка и Быля), но лично я знаю только троих более-менее хороших паскалевцев - Матюк Дима, Толик(занявший 1-ое) и Макс (фамилию не помню, равно как и не знаю его успехи в этом году)... :-/ А среди 10-х - Лопато Павел, Быль, Дулуб(правда, по-мойму чисто на геометрию), я (правда, чисто на переборы и всё подобное ОЧЕНЬ)... Но Быль, конечно, решает.... блин.... Хотя он на области завалил самую простую задачу..... :-/ В общем, с этим мне оч повезло.... :-/
А по поводу отсева, мне уже второй год говорят, что "первое место идёт вне конкурса", в т.ч. те, кто эти сборы проводит (правда, всякие Курилы - не самый надёжный источник информации... по-мойму...).

[iced]

а таки всё ещё пишут на паскале? ыыыхъ. пропали мои усилия :[

[dragoon6]

Аааа, блин, там Корончик (в смысле Макс который)... По поводу кемежа, то он, по-мойму, давно уже забил на все олимпиады и т.д. Вот только не могу вспомнить, кто такой Васильев... фамилия вродь знакомая.....

[dragoon6]

А пишут пока на пасе... Есть тут, правда, некоторые любители С++, ток на этой олимпе тому любителю сишку не дали..... Хтя среди своей парраллели он взял первое.  :-/

[iced]

дятлы дикие. пасцаль - в отстойник истории.

[LamMeR]

По поводу силы участников - я с твоим мнением согласен (насчёт Матюка и Быля), но лично я знаю только троих более-менее хороших паскалевцев - Матюк Дима, Толик(занявший 1-ое) и Макс (фамилию не помню, равно как и не знаю его успехи в этом году)... :-/ А среди 10-х - Лопато Павел, Быль, Дулуб(правда, по-мойму чисто на геометрию), я (правда, чисто на переборы и всё подобное ОЧЕНЬ)... Но Быль, конечно, решает.... блин.... Хотя он на области завалил самую простую задачу..... :-/ В общем, с этим мне оч повезло.... :-/
А по поводу отсева, мне уже второй год говорят, что "первое место идёт вне конкурса", в т.ч. те, кто эти сборы проводит (правда, всякие Курилы - не самый надёжный источник информации... по-мойму...).

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

[iced]

та ну насчёт первых мест. мну всегда шёл вне конкурса. более того - диплом с республики - пропуск на следующую вне конкурса был.

[dragoon6]

насчёт всяких Курил - я просто не помню, как зовут другого препода, который у нас в прошлом году сборы вёл (9 класс)... Там, по-мойму, кто-то из Лиды.... А Курило(или -а - я так и не понял) у  меня символизирует фсех преподов по инфе..... И вообще, по-мойму, он реальный чел... Вот только на сборах + в науке я его уже так ...... :-/
Насчёт привилегий... Быль, кстати, когда я с ним после области разговаривал, был того-же мнения по поводу отсева 1-ого места... а вобще я особо не гружусь по сборам.... Даже если фсё-тки 1-ое место на репу едет не 100%, то лично я думаю, что меня обойдут из 10-х классов Лопата и Быль..... Эт моё мнение..... Вот.....

[Vasiliy]

Всем привет.
Не могу промолчать.
to dragoon6:
   твоя цитата:"Перее#ать бы всех козлов,
                         У которых нет мозгов..."
С тебя надо начинать!

И не гони на Курилу!

[dragoon6]

to LamMeR:
"сам лично его знаю".... Ага, щас.... Я твой логин и не узнаю.... И сообщения посмотреть не могу... Короч, Серёга, скоро увидимся.... Хоть ты и не рад.... Я так думаю....
to Vasiliy:
Нет уж, ты 1-ый.... Во вём буш....

[iced]

а чего? сборы скоро? мож мну часик найти - подойти - посмотреть на подрастающее поколение.

[dragoon6]

Ну-у-у-у.... Андрей проснулся..... Сборы уже сегодня были (1-ый день).... с 14:00 до 17:15+-15... уже не помню...... А вообще - заходи. Если не в курсе, то сборы в 1-ой СШ-Лицее.... Как и фсегда..... Вот.....

[iced]

забуду, да и со временем напряг. наберите кто нить 7869068 хде нить в районе 4-5ти когда они будут - может подъеду.

[dragoon6]

Я масимум только если два глухаря в районе 4-4.30 часов

[Vasiliy]

to LamMeR:
to Vasiliy:
Нет уж, ты 1-ый.... Во вём буш....

Ты чел так больше не шути!!!!!

[RILLey_ELf]

молодцом ребята понаписывали
посмотрим кто чего понаписывал на олимпе  
смотрю есть человеки кто начинает забивать а так нельзя!
енто раз - то что сегодня было - вообще разврот
енто два - то кто там чего позанимал - это всё отстой (я доказательство)
енто три - Ребята учите физику математику не прогадаете - а если хотите поиграться - то играйтесь в полную меру - потому как если завтра никто не скажет как писать дихотомию - это будет весело!:)
все старания тогда впустую.

[dragoon6]

to Vasiliy:
а ты иди на....... задолбали уже.... нехорошие человеки.....
to SeeEd:
"енто два - то кто там чего позанимал - это всё отстой (я доказательство)"
Т.Е.?
 "потому как если завтра никто не скажет как писать дихотомию - это будет весело"
ну.... не сказать, что было весело, но.........

[ErEpb]

енто два - то кто там чего позанимал - это всё отстой (я доказательство)

Т.Е. Он поддерживает Курилу, что даже если ты первый на области это не значит что ты стопудова на респу едишь

[RILLey_ELf]

ничего тестирование покажет кто умеет проверять деление на ноль кто имеет полный перебор делать полным кто знает что такое дейкстра

короче я думаю что поедут точно на все 99%
матюк быль (хотя они не старается) соколов лопато машуто (99%) апетит (98%) и возможно фёдор на 93%

[highlight]вот мои предположения[/highlight]
на самом деле:
неужели никто не решил все задачи?

[ErEpb]

А я думаю что на все 100% независимо от сборов поедут Матюк и Соколов

[dragoon6]

ничего тестирование покажет кто умеет проверять деление на ноль кто имеет полный перебор делать полным кто знает что такое дейкстра

Ну.... Проверять деление на ноль, судя по всему, я так и не научился... хтя задача 4 (Курилы), в которой у меня не было предусмотрено деление на 0, хотя это было очень вероятно, прошла на 100%... А всё остальное вроде-бы умею....

короче я думаю что поедут точно на все 99%
матюк быль (хотя они не старается) соколов лопато машуто (99%) апетит (98%) и возможно фёдор на 93%

Неужели обо мне такое плохое мнение, а???
а Лопато то подкачал.... А что было на области... :-? Там он, блин, дал...

вот мои предположения
на самом деле:
неужели никто не решил все задачи?

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

А я думаю что на все 100% независимо от сборов поедут Матюк и Соколов

Угу... Кстать... Good аватара....

[RILLey_ELf]

хм хм хм
не знаю кто ты - но стабильно поедут машуто богатов бурдун и быль
это 100 % (если с ними ничего не случится)
обо всех остальных я не спрашивал - но кста завтра будут полные резалты - я их обязательно здеся выложу

[dragoon6]

хм хм хм
не знаю кто ты - но стабильно поедут машуто богатов бурдун и быль
это 100 % (если с ними ничего не случится)
обо всех остальных я не спрашивал - но кста завтра будут полные резалты - я их обязательно здеся выложу

Чёт долго твоих резалтов нету... Ты уж в Минске наверное, а резалты выложить забыл, наверное...   Эх... Ладно, блин... Ломакин обещал, что сёння верером звонить будет.... Бум ждать....

(если с ними ничего не случится)

хм.....................

[-=КирЯ=-]

Подкиньте пару загонных програм, плиз............................

[Vasiliy]

Подкиньте пару загонных програм, плиз............................

Каких программ ты хочешь :-?

[RILLey_ELf]

нее пить вредно точно забыл
загонных
begin
while (1=1)begin
end;
end.
ничего так
когда закончит работать довольно загонно

[Toreador]

Вообще тема была создана не для стрелок в каком-либо месте, в какое-либо время...
По ходу... не для выяснений какой язык программирования лу4ше!...
и не для разговоров типо Pascal fuflo & etc!!!///
Скажите! Кто из вас не знает паскаля... кто с него не на4инал?...
кто не сидел(сидит) за этим синим("голубым") экраном???...
Кто не проверял существования треугольника по 3-м сторонам...
гы-гы...

Паскаль - это на4ало...
...
.

[VooDoo]

начало это Basic  

[X-Penguin]

Скажите! Кто из вас не знает паскаля... кто с него не на4инал?...
кто не сидел(сидит) за этим синим("голубым") экраном???...
Кто не проверял существования треугольника по 3-м сторонам...
.

Я начинал не с Паскаля, это не обязательное начало, но возможное.
Я не сидел за синим экраном, так как можно писать в любимом текстовом редакторе.
А вот треугольник проверял
Вобщем всё это интересно до тех пор, пока учат именно основам, но когда в нашем университете начинают задиктовывать API библиотек отдельных реализаций, то как по мне это через чур... но остальным вроде нравится

[Гонзих]

ИМХО Паскаль ето то с чего проще всего начинать. Я начинал с паскаля, попутна изучая дэлфу (ето было в 14 лет, был самоучкой, потом начал ходить на курсы, ща учусь по специальности программера). Незнаю... Может если бы не то детское увлечени, то теперь я был бы далеким от техники человеком и не писал бы ету мессагу... А тему топика поддерживаю, ПАСКАЛЬ ДЕЙСТВИТЕЛЬНО РУЛИТ!!!

[XeXe]

Помогите пожалуйста написать программу:
"Дано натуральное число n (n<=9999).  Верно ли, что это число содержит ровно три одинаковые цифры, как, например, числа 6676, 4544…"   П О Ж А Л У Й С Т А

[Toreador]

Почему 6?
нашёл только 8(((

[VooDoo]

дык 6 жеш вроде