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

TiPo

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

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

  • Посещение

Весь контент TiPo

  1. Пиратки ещё живы? Небольшой оффтоп: вы ещё живы?
  2. В какой ВУЗ стоит действительно поступать? Где дают знания? P.S. Если нужны уточнения по вопросу, то сделать их смогу немного позднее: этот вопрос не для меня.
  3. Подобрал из Lenovo вот что: Lenovo IdeaPad Z500. 1-ая версия: http://bit.ly/11iXZ3r Lenovo IdeaPad Z500. 2-ая версия: http://bit.ly/1c8CdnJ Lenovo B590: http://bit.ly/139YWfT Здесь дискретная + встроенная графика. Lenovo V580: http://bit.ly/19meyk4
  4. Поступаю на программиста, не могу определиться на какое направление пойти учиться. Подскажите что лучше, и если хотите, расскажите об этих направлениях, то есть чем они отличаются друг от друга. 1. Информатика и вычислительная техника (230100) 2. Прикладная математика и информатика (010400) Заранее спасибо.
  5. До 25 000, но как сказал, если можно, то сэкономить.
  6. Буду учиться на программиста, параллельно дополнительное самообразование. Необходимо приобрести ноутбук, желательно не очень дорогой. Вот составил список необходимых требований к ноутбуку(может вы ёще что подскажите): [*:cd98cf1b64] Оперативная память не меньше 4 ГБ. [*:cd98cf1b64] Процессор "от" i5. [*:cd98cf1b64] Экран не глянцевый, то есть матовый. [*:cd98cf1b64] Экран в пределах 15 дюймов, лучше если 15"6. [*:cd98cf1b64] Вес. Чем меньше, тем лучше, но не больше 3 кг. [*:cd98cf1b64] Автономность от 4 часов. Чем больше, тем лучше. [*:cd98cf1b64] Удобная клавиатура. [*:cd98cf1b64] Видеокарта. Хотелось бы и поиграть во что-нибудь новое(хотя я не особо на это налегаю, но всё же). [*:cd98cf1b64] Не слишком дорого. Я выбрал несколько моделей. Что вы можете сказать о них: [*:cd98cf1b64] Lenovo B590. Ссылка: http://market.yandex.ru/model.xml?modelid=8529014&hid=91013 [*:cd98cf1b64] Lenovo IdeaPad Z580. Ссылка: http://market.yandex.ru/model.xml?CMD=-RR=9,0,0,0-PF=1801946~EQ~sel~1871127-PF=2142398356~EQ~sel~24729751-VIS=70-CAT_ID=432460-EXC=1-PG=10&modelid=8292006&hid=91013 [*:cd98cf1b64] Acer ASPIRE V5-571PG-53336G50Ma. Ссылка: http://market.yandex.ru/model.xml?CMD=-RR=9,0,0,0-PF=1801946~EQ~sel~3598551-PF=2142398356~EQ~sel~x223599465-VIS=70-CAT_ID=432460-EXC=1-PG=10&modelid=9262041&hid=91013 [*:cd98cf1b64] Lenovo G580. Ссылка: http://market.yandex.ru/model.xml?CMD=-RR=9,0,0,0-PF=1801946~EQ~sel~1871127-PF=2142398356~EQ~sel~40604311-VIS=70-CAT_ID=432460-EXC=1-PG=10&modelid=8229995&hid=91013 [*:cd98cf1b64] ASUS PRO ESSENTIAL PU500CA. Ссылка: http://market.yandex.ru/model.xml?CMD=-RR=9,0,0,0-PF=1801946~EQ~sel~1870655-PF=2142398356~EQ~sel~x511455081-VIS=70-CAT_ID=432460-EXC=1-PG=10&modelid=10386474&hid=91013 [*:cd98cf1b64] Lenovo IdeaPad Z500. Ссылка: http://market.yandex.ru/model.xml?CMD=-RR=9,0,0,0-PF=1801946~EQ~sel~1871127-PF=2142398356~EQ~sel~x34924649-VIS=70-CAT_ID=432460-EXC=1-PG=10&modelid=8525025&hid=91013 [*:cd98cf1b64] Lenovo THINKPAD Edge E530. Ссылка: http://market.yandex.ru/model.xml?CMD=-RR=9,0,0,0-PF=1801946~EQ~sel~1871127-PF=2142398356~EQ~sel~9013143-VIS=70-CAT_ID=432460-EXC=1-PG=10&modelid=8353399&hid=91013 Заранее спасибо.
  7. Слева либо поезд, либо дом, либо забор.
  8. TiPo

    Dota 2

    Okami Потому что это АЙ-СИ-КАП! Хыдыщь.
  9. TiPo

    Dota 2

    Ayumi Как повезёт, я уже 997 часов наиграл, зато на 60 лвл, экстраординарных АМов с даггером давно не встречал.
  10. dimasdash По-моему в режмие роутера не создать сервер.
  11. На быструю руку(pascal): var n, i, j:integer; a:array [1..20, 1..20] of integer; begin readln(n); for i:=1 to n do begin for j:=1 to n do begin read(a[i,j]); if i mod 2=0 then a[i,j]:=a[i,j]-a[i-1,j]; end; writeln; end; for i:=n-3 to n do begin for j:=1 to n do write(a[i,j], ' '); writeln; end; write('Press Enter'); readln; end.program u4; n можно объявить как const n = 20; тогда a:array [1..n, 1..n] of integer
  12. pam-param Может вы путаете с оригинальностью текста? Я когда подрабатывал рерайтом проверял оригинальность через адвего. Без особых усилий 95-100% оригинальности. Если что, то можно на free-lance.ru или freelansim.ru оставить заказ. Новички, обычно, берут 20р. за 1000збп..
  13. Решал лёгкую задачу, решил, но код получился, мне кажется, не очень хорошим. Потом посмотрел решение другого человека, так у него решение оказалось в два раза короче. Пожалуйста посмотрите решения и укажите на ошибки. Условие задачи: В небольшом островном государстве действовали забавные законы относительно транспортных средств – автобусов, грузовиков, легковушек. Во-первых, общее количество автомобилей на острове не должно было превышать 256. Автомобилям назначались номера с 0 до 255, при этом соблюдались следующие правила. Номера, делившиеся без остатка на 7, назначались автобусам. Те, что делились без остатка на 5, назначались грузовикам, а все прочие – легковушкам. Так, например, номера 35 и 70 доставались автобусам, а не грузовикам, хоть и делились на 5. Похожие правила применялись и к окраске автомобилей, а именно. Если номер авто делился на 4, его красили красным, если на 3 – желтым, если на 2 – белым, а остальные автомобили красили черным. · Сформируйте три множества по классам автомобилей – автобусы, грузовики и легковушки. Вычислите количество машин каждого класса (Ответ: 37, 44, 175). · Сформируйте четыре множества по цвету автомобилей – красные, желтые, белые и черные. Определите количество машин каждого цвета (Ответ: 64, 64, 43, 85). · Столица того государства – деревня Кокосовка – страдала от пробок. Для борьбы с ними ввели ограничение на въезд транспорта. Так, в один из дней недели в столицу пускали только красные легковушки, белые грузовики и все автобусы. Найдите номера всех этих машин. Сколько всего автомобилей могло въехать в столицу в тот день? Моё решение: TSet = set of byte; var i:byte; Bus, Truck, Car, Red, Yellow, White, Black, Sets:TSet; function ReadType(aI:byte):TSet; var n:byte; begin ReadType:=[]; for n:=0 to 255 do if n mod aI=0 then ReadType:=ReadType+[n]; end; procedure SetOfType(var aBus, aTruck, aCar:TSet); var i, j:byte; begin i:=7; repeat case i of 7:aBus:=ReadType(i); 5:aTruck:=ReadType(i)-aBus; else for j:=0 to 255 do if not (j in aBus+aTruck) then aCar:=aCar+[j]; end; i:=i-2; until i<3; end; function ReadColor(aI:byte):TSet; var n:byte; begin ReadColor:=[]; for n:=0 to 255 do if n mod aI=0 then ReadColor:=ReadColor+[n]; end; procedure SetOfColor(var aRed, aYellow, aWhite, aBlack:TSet); var i, j:byte; begin i:=4; repeat case i of 4:aRed:=ReadColor(i); 3:aYellow:=ReadColor(i)-aRed; 2:aWhite:=ReadColor(i)-(aRed+aYellow); else for j:=0 to 255 do if not (j in aRed+aYellow+aWhite) then aBlack:=aBlack+[j]; end; dec(i); until i=0; end; procedure WriteSets(aSet:TSet); var j, k:byte; begin k:=0; for j:=0 to 255 do begin if j in aSet then inc(k); end; write(k, ' '); end; begin //Множества типов автомобилей Bus:=[]; Truck:=[]; Car:=[]; //Множество цветов Red:=[]; Yellow:=[]; White:=[]; Black:=[]; SetOfType(Bus, Truck, Car); SetOfColor(Red, Yellow, White, Black); for i:=1 to 7 do begin case i of 1:Sets:=Bus; 2:Sets:=Truck; 3:Sets:=Car; 4:Sets:=Red; 5:Sets:=Yellow; 6:Sets:=White; 7:Sets:=Black; end; WriteSets(Sets); if (i=3) or (i=7) then writeln; end; Sets:=(Red*Car)+(White*Truck)+Bus; WriteSets(Sets); readln; end.type Решение другого человека: procedure WriteSet(const aSet : TAuto); var k : integer; begin for k:=0 to 255 do if k in aSet then Write(k:4); Writeln; Writeln('---'); end; function Count(const aSet : TAuto): integer; var k, r : integer; begin r:=0; for k:=0 to 255 do if k in aSet then Inc(r); Result:=r; end; var Bus, Truck, Car : TAuto; Red, Yellow, White, Black : TAuto; i: integer; R: TAuto; begin Bus:=[]; Truck:=[]; Car:=[]; Red:=[]; Yellow:=[]; White:=[]; Black:=[]; for i := 0 to 255 do begin if (i mod 7 = 0) then Bus:= Bus+[i] else if (i mod 5 = 0) then Truck:= Truck+[i] else Car:= Car+[i]; end; for i := 0 to 255 do begin if (i mod 4 = 0) then Red:= Red+[i] else if (i mod 3 = 0) then Yellow:= Yellow+[i] else if (i mod 2 = 0) then White:= White+[i] else Black:= Black+[i]; end; Writeln(Count(Bus)); WriteSet(Bus); Writeln(Count(Truck)); WriteSet(Truck); Writeln(Count(Car)); WriteSet(Car); Readln; Writeln(Count(Red)); WriteSet(Red); Writeln(Count(Yellow));WriteSet(Yellow); Writeln(Count(White)); WriteSet(White); Writeln(Count(Black)); WriteSet(Black); Readln; R:= Red*Car + White*Truck + Bus; Writeln(Count(R)); WriteSet(R); Readln; end.type TAuto = set of byte;
  14. Galiboff бан же почти у всех всех, там никого нету.
  15. А зачем вы ими пользуетесь? "Проблемы" с компьютерами появляются не из-за самих компьютеров, а из-за самого человека. Если последний не умеет планировать своё времяпровождение с компьютером, не умеет ограничивать себя, то ясень пень он может получить так называемую "компьютерную зависимость". Всё как с алкоголем, кто-то умеет пить немного и культурно, а кто-то валяется под забором.
  16. По-моему что-то не так с нечётными числами: var n,r,u,Shet:integer; begin readln(n, r, u); Shet:=0; if n=3 then Shet:=Shet+r else repeat n:=n div 2; if n=3 then Shet:=Shet+r else Shet:=Shet+u; until n=1; writeln(Shet); readln; end.
  17. Mac Это ли розовые очки? Лучше знать происходящее вокруг нежели быть слепым котенком. Тем более я считаю, что счастье не зависит от происходящего в мире и плохой информации, каждый человек сам творит своё счастье не смотря на происходящее вокруг него.
  18. Если решили, то проверьте своё решение здесь: http://informatics.mccme.ru/moodle/mod/statements/view3.php?id=4908&chapterid=111223
×
×
  • Создать...