Перейти к содержанию

Скиф

Пользователи
  • Постов

    47
  • Зарегистрирован

  • Посещение

Сообщения, опубликованные Скиф

  1. Здравствуйте, сколько будет стоить строительство полумансардного 8*9 и гаража с баней пристроем к дому. С вашим материалом, фундамент есть

  2. Кто-нибудь был в клубе партизан? Это просто публичный дом! Девушек там конечно много, но вести себя я думаю им надо по другому. В общем пока оценка негативная, хотя может что-то получиться. И цены высоковаты для такого места

  3. Компания VIDEO|CITY

    т. 666-889

     


     

    В Россию возвращаются "лихие 90-е" и с каждым днем учащаются случаи краж и ограблений. Предотвратить преступление или поймать злоумышленника не составит 

     

    особого труда, если Вы заранее позаботитесь о своей безопасности.

     

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

     

    охранных мер считается максимально доступным.

     

    Чаще всего грабители, убедившись в факте наличия камер, считают нужным бросить начатое, выбирая более нехитрую добычу. Если же преступник все-таки решился 

     

    на злодеяние, Вы всегда сможете доказать его вину.

     

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

     

    клиентов.

     

    Компания VIDEO|CITY появилась в Бурятии одной из первых, и за годы работы зарекомендовала себя только с лучшей стороны. Все наши клиенты довольны нашими 

     

    ценами, качеством и сроком выполнения работ. Мы всегда подберем для Вас выгодное предложение.

     

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


     

    -Низкие цена

    -Короткие сроки выполнения

    -Огромный опыт

    -Надежность

     

    Сейчас действует ограниченная акция: Приведи друга и вы оба получите скидку 20%

     

    По любым вопросам обращаться по телефону: 666-889

  4. Дед Мороз и Снегурочка спешат к вам, чтобы поздравить с самым долгожданным, полным чудес и волшебства, праздником – Новым 2015 Годом! Вместе с ними в ваш дом придут веселье, шутки, розыгрыши, пожелания и, конечно, подарки – лучшее украшение любого мероприятия.

    Контакт: л\с, 369-369

  5. 8 августа будет два разных мероприятия - сначала гонки по взлетной полосе, после обеда - юбилей завода, там и будут выступать "боники". Лично я считаю, что сходить надо на оба. Когда еще такое увидишь

    А что будет во время второго мероприятия? Будет авиа-шоу и выступление Десантников?

  6. Скиф

    program D_Andre;

    type Pere=array [1..10] of byte;

    var N,i,j:byte;

    X:Pere;

    Yes:boolean;

    procedure Next(var X:Pere;var Yes:boolean);

    var i:byte;

    procedure Swap(var a,b:byte); {обмен переменных}

    var c:byte;

    begin c:=a;a:=b;b:=c end;

    begin

    i:=N-1;

    while (i>0)and(X>X[i+1]) do dec(i);

    if i>0 then

    begin

    j:=i+1;

    while (jX) do inc(j);

    Swap(X,X[j]);

    for j:=i+1 to (N+i) div 2 do Swap(X[j],X[N-j+i+1]);

    Yes:=true

    end

    else Yes:=false

    end;

    function pro:boolean;

    var i:integer;

    f:boolean;

    begin

    f:=true;

    for i:=1 to n-1 do

    begin

    if i mod 2=1 then

    begin

    if x>x[i+1] then f:=false;

    end

    else

    begin

    if x

    end;

    end;

    pro:=f;

    end;

    begin

    assign(input,'p.txt');

    reset(input);

    assign(output,'p_OUT.txt');

    rewrite(output);

    readln(n);

    for i:=1 to N do X:=i;

    repeat

    if pro then begin for i:=1 to N do write(X);writeln;end;

    Next(X,Yes)

    until not Yes;

    close(output);

    end.

    создаш файл "p.txt" туда запишеш 7.

    Спасибо огромное!!!!!!

×
×
  • Создать...