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

Greezly

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

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

  • Посещение

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

  1. Голландия - Румыния 1:0 Франция - Италия 1:2
  2. Может кто-нибудь знает как уменьшать скорость вращения вентиляторов на корпусе и на проце Уж больно сильно шумят *24. За ответ заранее спасибо ЗЫ: Комп новый.
  3. Австрия - Германия 0:2 Польша - Хорватия 1:2
  4. Швейцария - Португалия 0:2 Турция - Чехия 1:2
  5. Италия - Румыния 1:0 Голландия - Франция 1:2
  6. Последний раз когда голосовал (в последний день) Байкал был на 3 или 4 месте. Ждем результатов
  7. Чехия 0-3 Португалия Швейцария 2-1 Турция
  8. Россия 2:1 Испания Швеция 0:2 Греция (как понял если угадал ничью то полюбому 2 балла получаешь,так? ведь разница мячей =0
  9. Выходит акция "неповиновения" - скорее акция отчаянья. *23 Как минимум половина маршрутчиков потеряет работу, не будем на них сильно наседать. Конечно подло они поступили , но администрация наша тоже хороша, а чего она ожидала от таких заявлений? *20
  10. Тест на усталость
  11. Фильм интересен тем что противоречит сложившимся (упомынутым в СМИ) фактами ( это и притягивает). В правдивости фактов можно усомниться (помните журналисты это не историки), но ряд закономерностей прослеживается. ЗЫ: глобализация в мире началась с момента появления ООН. Она несет статус международного правительства (США в нем всегда рулило) ЗЫЫ: про амеру уже давно где-то слышал (или дежавю)
  12. в кс играю немного патом выкидувает прося установить myAC 1.4.3 !!! скачал, установил, при запуске myAC сразу пишет disconnectet from myac.server и вылетает((( кто скажет в чем дело?
  13. то Gastly условие: m - монитор s - системник a - кол-во 1 рейсов b - кол-во 2 рейсов c - кол-во 3 рейсов a+b+c->min (3a+2b+c)m=15m (a+2b+4c)s=15s a>=0 b>=0 c>=0 также можно задать еще и на максимальное значение для a, b, с : a<=5 b<=7 c<=3 решу способом перебора(если можно)... вот: uses crt; var a,b,c:integer; d,min:integer; Begin clrscr; min:=15; for a:=0 to 5 do begin for b:=0 to 7 do begin for c:= 0 to 3 do begin if (3*a+2*b+c=15)and(a+2*b+4*c=15) then begin d:=a+b+c; if d min:=d; writeln('min= ',d,' : a=',a,', b=',b,', c=',c); end; end; end; end; readkey; End. PS: жду репки
  14. А куда же осколки тогда денуться? испаряться что ли. Американцы опять хитрят.
  15. Помойму в отличии того же Косово. Здесь вопрос ясен. Так как основное население Абхазии и Осетии коренное население, грузинов кажется там почти нет (В отличии от Косово - где помойму сербов чуть ли не больше чем албанцыв) Так что мой ответ - пусть отделяются если хотят. Так как Вопрос назрел уже давным давно и никто их не осудит. А кто против(конечно будет Georgia) - пусть в ООН жалуиться. Будит интересно посмотреть как ООН тогда поступит(после Косово)? Был не прав: В Косове 90% численности населения - албанцы, и с каждым днем сербов там становится все меньше( В Абхазии чуть менее половины - Абхазцы, остальные грузины и армяне и 10% русских. по данным википедии
  16. viktor70 пиши каким образом задается массив: из файла или генератором случайных чисел(random)?
  17. to тихон будет выглядеть где-то так uses crt; var x,y,z,a1,a2,a3: real; Begin write('x='); readln(x); write('y='); readln(y); write('z='); readln(z); {1} {a1-men'shaya, a2-srednya, a3-samaya bol'shaya} if (x>y) then begin if (x>z) then begin a3:=x; if (y>z) then begin a1:=z; a2:=y; end else a1:=y; a2:=z; end else a1:=y; a2:=x; a3:=z; end else if (y>z) then begin a3:=y; if (x>z) then begin a1:=z;a2:=x; end else a1:=x;a2:=z; end else a1:=x; a2:=y; a3:=z; {2} if (a1+a2)>a3 then {3} if (sqr(a1)+sqr(a2)) > sqr(a3) then writeln('treeugolnik ostrougolnii') else writeln('treeugolnik ne ostrougolnii') else writeln('treeugolnik ne suschestvuet'); readkey; End. З.Ы. не помню прямоугольный треуг-к. - остроугольный или нет(посчитал что нет)
×
×
  • Создать...