MAX
Подпишись
стань автором. присоединяйся к сообществу!
16 февраля 27
206
Великоросс Производство

ОПК приступила к производству армейских ноутбуков нового поколения

Корпорация начинает производство новых армейских ноутбуков, защищенных от экстремальных температур, механических воздействий и кибератак. Техника создана для тактических подразделений Вооруженных Сил РФ, ее назначение — обработка информации в ходе выполнения боевых задач.

[читать статью полностью...]

Кстати, а вы знали, что на «Сделано у нас» статьи публикуют посетители, такие же как и вы? И никакой премодерации, согласований и разрешений! Любой может добавить новость. А лучшие попадут в наш Телеграм @sdelanounas_ru. Подробнее о том как работает наш сайт здесь👈

Источник: opkrt.ru

Комментарии 0

Для комментирования необходимо войти на сайт

все комментарии
  • -1
    Нет аватара guest16.02.16 22:18:37

    Вот ща не-патриотичную вещь скажу — но начал бы я со следующего:

    define end = конец

    define if = если

    define else = если не

    и далее по списку

    #748442 ↑
    • 2
      Serg My Star Serg My Star16.02.16 22:25:06

      А теперь посмотрите — Количество слов(букв) в русском гораздо короче. И учитываю другую логику обработки. ДРУГУЮ. Ему не надо было это переводить на аглицкий. Он думал на русском. Свой перевод посмотрите, посчитайте символы, учитывая что перевод не нужен. Хе. Пробелы, и всю остальную требуху… Как-то так. Всего лишь скорость, без всякой частоты проца. И давайте не будем спорить. Нет темы.

      Отредактировано: Serg My Star~23:27 16.02.16
      #748448 ↑
      • 0
        Нет аватара guest16.02.16 22:43:46

        Э…

        чет я Вас не понял

        посчитал

        end — 3, конец — 5.

        if — 2, если — 4

        Ну да не суть.

        Я и не спорю.

        У меня просто от взгляда на этот код мозг трещину дал. Возможно с непривычки.

        Но я думаю такой не один. Либо годный софт, либо русское написание.

        Хотите и то и это — надо с дет. сада учить на русском программировать.

        Начнете сейчас — через 20 лет получите первых программистов.

        Отредактировано: Антон Смоленский~23:44 16.02.16
        #748453 ↑
        • 0
          Serg My Star Serg My Star16.02.16 22:47:48

          не «end», а «define end» = «конец» 10 против 5. Ну да ладно. С мозгом все нормально     С привычкой, не совсем. Учитывая что 3х битке не надо искать обходы в вычислениях, с плавающей запятой. Да бог с ним. Привычка — вторая натура. Опять же перевод. Наши заклятые друзья мозг сломают думая над кодом —

          …процедура добавсп = проц(ф32 список, знач) начало

          если не естьпусто список[1] то…

          Вот у них то точно мозг сплавится, энигма отдыхает.   

          Отредактировано: Serg My Star~23:59 16.02.16
          #748455 ↑
          • 0
            Нет аватара guest16.02.16 22:51:54

            не end, а «define end» = «конец» 10 против 5

            Ну дык один раз в жизни же задефайнить надо. А потом просто файлик компилятору подсовывать.    

            #748456 ↑
            • 0
              Serg My Star Serg My Star16.02.16 23:05:24

              Держите весь кусок. Здесь ссылки отключены. Найдите ссылку,есть компиляторы этого языка в инете, если интересно.

              Попробуйте проанализировать. И это 1976 год.    Тогда про персоналку даже не мечтали.    

              программа

              процедура печатьэл = проц(ф32 эл) начало

              ф32 к;

              для к от 1 до эл[0] цикл печать(эл[к]) повторить

              конец;

              процедура печатьсп = проц(ф32 список) начало

              если не естьпусто список то

              печатьэл(список[0]);

              печатькс();

              печатьсп(список[1])

              все

              конец;

              процедура добавсп = проц(ф32 список, знач) начало

              если не естьпусто список[1] то

              добавсп(список[1], знач)

              иначе

              ф32 с;

              список[1] := лок вект [2] ф32;

              с := список[1];

              с[0] := знач

              все

              конец;

              процедура вариант1 = проц(ф32 список) начало

              если не естьпусто список то

              ф32 слово := список[0];

              если слово[0] > 1 то

              ф32 слово2 := лок вект [слово[0] + 1] ф32, к;

              слово2[0] := 1;

              слово2[1] := слово[1];

              для к от 2 до слово[0] цикл

              если слово[к] <> слово[1] то

              слово2[0] := слово2[0] + 1;

              слово2[слово2[0]] := слово[к]

              все

              повторить;

              список[0] := слово2;

              вариант1(список[1])

              все

              все

              конец;

              процедура вариант2 = проц(ф32 список) начало

              если не естьпусто список то

              ф32 слово := список[0],

              слово2 := лок вект [слово[0]*2 + 1] ф32,

              к;

              слово2[0] := слово[0]*2;

              для к от 1 до слово[0] цикл

              слово2[к*2 — 1] := слово[к];

              слово2[к*2] := 0

              повторить;

              список[0] := слово2;

              вариант2(список[1]) все

              конец;

              ф32 список := лок вект [2] ф32;

              ф32 слово;

              слово := лок вект [4] ф32;

              слово[0] := 3;

              слово[1] := 3;

              слово[2] := 2;

              слово[3] := 3;

              добавсп(список, слово);

              слово := лок вект [7] ф32;

              слово[0] := 6;

              слово[1] := 7;

              слово[2] := 4;

              слово[3] := 7;

              слово[4] := 2;

              слово[5] := 3;

              слово[6] := 7;

              добавсп(список, слово);

              слово := лок вект [5] ф32;

              слово[0] := 4;

              слово[1] := 2;

              слово[2] := 2;

              слово[3] := 1;

              слово[4] := 2;

              добавсп(список, слово);

              печатьсп(список[1]);

              печатькс();

              вариант1(список[1]);

              печатьсп(список[1])

              конец

              Учитывая что сейчас мозги несколько оптимизированы — можно улучшить,    

              Отредактировано: Serg My Star~00:20 17.02.16
              #748461 ↑
              • 0
                RadiantConfessor RadiantConfessor17.02.16 10:26:04

                А ещё удобно использовать большие и маленькие буквы, и отступы.

                Отредактировано: Zveruga~11:26 17.02.16
                #748599 ↑