Как стать автором
Обновить
16
0

Быдлокодер

Отправить сообщение
В 2008 году я жил в одном провинциальном городе с населением ~300 000 и работал сисадмином в одном филиале одного достаточно крупного университета где обучали, в том числе, и программистов.
Там студенты учили турбо паскаль и турбо с++ от борланда, 1C предприятие, уроки по экселю и ворду, ну и аксес с бейсиком, куда без них.

в 2009 году я поступил учиться на программиста в универ в один маленький скандинавский городок с населением в ~15 000 жителей.
Там у нас были Java, C#, PHP, Oracle, MySQL. Там были InteliJ, Visual Studio и лицензионный 3ds Max, там была халява от майкрософта и доступ в кучу онлайновых библиотек. В бумажной библиотеке, если какой-то книги не было, ее можно было заказать и ее покупали. Каждый год кучи книг (для которых вышли новые издания) раздавались бесплатно. Там было свободное посещение и возможность в некоторой степени корректировать свой учебный план. Там был абсолютной другой подход к преподаванию, никто тебя не тащил — хочешь учиться, вот тебе все ресурсы, не хочешь — давай до свидания. И да, учеба была полностью бесплатна, даже для всяких понаехавших вроде меня.
Что за бред вы несете, какую нагрузку на сервис несет парсинг, который осуществляется уж точно не вашим сервисом? Когда пользователи открывают вашу страницу они что, не несут нагрузку? Пользователь заходя на сайт загружает пачку стилей и скриптов, в то время как Леван загружал только сам хтмл и парсил его уже точно не на вашем сервере. Подобную чушь вы можете корреспондентам газет пороть, электорат схавает, но уж точно не здесь.
Пару лет назад делал на рабочую Минольту SR-T 101 1968 года выпуска

image
Выдаст предупреждение при компиляции:
57:22 warning: «Constraint_Error» will be raised at run time
57:22 warning: value not in range of type «T_Age» defined at line 6
и ошибку при выполнении:
raised CONSTRAINT_ERROR: main.adb:57 range check failed
пффф....</irony mode = off>
with Ada.Text_IO; 
procedure Main is

   package Sout renames Ada.Text_IO;
   
   type T_Age is new Natural range 0 .. 120;
   AGE_MALE   : constant T_Age := 65;
   AGE_FEMALE : constant T_Age := 55;

   type T_Gender is (MALE, FEMALE);

   type T_Person is record
      Age    : T_Age;
      Gender : T_Gender;
   end record;

   type T_Person_Arr is array (Positive range <>) of T_Person;
   Persons : constant T_Person_Arr := --test array
     ((30, MALE),
      (40, MALE),
      (60, FEMALE),
      (65, MALE),
      (25, FEMALE),
      (67, MALE));
   
   function Is_Pens (P : T_Person) return Boolean is
   begin
      case P.Gender is
         when MALE =>
            return P.Age >= AGE_MALE;
         when FEMALE =>
            return P.Age >= AGE_FEMALE;
         when others =>
            return False;
      end case;
   end Is_Pens;
   type Is_Pens_Access is access function(P: T_Person) return Boolean;
   
   function Filter (P_Arr : T_Person_Arr; Callback: Is_Pens_Access) return Integer is
      Return_Int : Integer := 0;
   begin
      for I in P_Arr'Range loop
         if Callback(P_Arr(I)) then 
            Return_Int := Return_Int +1;
         end if;
      end loop;
      return Return_Int;
   end Filter;
   Returned_Val : Integer := 0;
begin
   Returned_Val := Filter(P_Arr    => Persons,
                          Callback => Is_Pens'Access);
   Sout.Put_Line("Total pens'es:  "& Integer'Image(Returned_Val));
end Main;

Вроде как применяется http://www.adacore.com/customers
Cмех смехом, а я периодически ловлю себя на мысли что не помню как аякс запрос на js написать без jQuery.
Правда в следующем году они от кобола отказываются в пользу джавы.

http://www.skatteetaten.no/no/Bedrift-og-organisasjon/Arbeidsgiver/skattetrekk/Skattekort-og-forskuddsskatt/Dokumentasjon-og-program-for-beregning-av-skattetrekk/

Причем в английской версии об этом ни слова.
with Loop_Types; use Loop_Types; use Loop_Types.Lists;

procedure Search_List_Max (L : List_T; Pos : out Cursor; Max : out Component_T) with
  SPARK_Mode,
  Pre  => not Is_Empty (L),
  Post => (for all E of L => E <= Max) and then
          (for some E of L => E = Max) and then
          Has_Element (L, Pos) and then
          Element (L, Pos) = Max
is
   Cu : Cursor := First (L);
begin
   Max := 0;
   Pos := Cu;

   while Has_Element (L, Cu) loop
      pragma Loop_Invariant (for all Cu2 in First_To_Previous (L, Cu) => Element (L, Cu2) <= Max);
      pragma Loop_Invariant (Max = 0 or else (for some Cu2 in First_To_Previous (L, Cu) => Element (L, Cu2) = Max));
      pragma Loop_Invariant (Has_Element (L, Pos));
      pragma Loop_Invariant (Max = 0 or else Element (L, Pos) = Max);

      if Element (L, Cu) > Max then
         Max := Element (L, Cu);
         Pos := Cu;
      end if;
      Next (L, Cu);
   end loop;
end Search_List_Max;

отсюда
я сразу вышел на ассоциацию с куздрой и алисой, но все равно не пойму как из этого ответ состряпать… Ничего связанного с Кэрролом или Куздрой не принимает.
Антенна около Архангельска, сам солдат возле Мезени. Самое вкусное для американцев в том районе это Северодвинские предприятия СМП, Арктика, Звездочка и космодром под Плесецком.

На самом деле создатели картинки скорее всего хотели поместить его возле cеверонорвежского города Tromsø, где расположена станция спутниковой связи компании KSAT
lenta.ru/news/2015/04/11/mvd походу вот продолжение
На Шпицберегене вчера утром медведь на палаточный лагерь в пол шестого утра таки напал, застрелили. Упел одного чеха покусать. Пострадавший героически отбивался от медведя в течении минуты.
image

А у нас полного затмения не было =(
image
не, вздритнуть уже занято. Это «посрать» по норвежски
Это ему Оппортьюнити дальним мигнул.
Идея конечно абсолютно негуманная, но в целом неплохая.
Можно было бы например применять маньяков/педофилов/серийных убийц для этой цели.
В 1946 IBM представила 603 Electronic Multiplier www-03.ibm.com/ibm/history/history/year_1946.html
В 1960 Stretch computing system, продолжение 700 серии *в тексте ссылка на фото с IBM 704)
русс. пробовать
it — provare
nor. prøve

возможно prov может означать «пробовать»

Как переводить в сочетании с ro не знаю, мы ведь не знаем какие это языки, и вообще языки ли.

ЗЫ

Возможно Ro prov? означает Давайте попробуем?
Можно попробовать погуглить кто родился в 1920 и умер в 1978
и узнать кто может скрываться за Rontar Crips

Информация

В рейтинге
Не участвует
Откуда
Oslo, Oslo, Норвегия
Зарегистрирован
Активность