<span>Нельзя использовать кодовые слова, которые начинаются с 0 или с 10. 11 также не можем использовать, поскольку тогда мы больше не сможем взять никакое другое кодовое слово, а нам их нужно пять. Поэтому берём трёхзначное 110. По Условию Фано, если есть a, то ab существовать не может. Другими словами, мы не можем использовать начало с 0, а если возьмем 11, то начинать другие числа не сможем. Поэтому остается брать числа 110,1110,1111(последний берем без 0, т.к. он последний и других чисел уже не нужно, но если бы и было нужно, то стоит взять число 11110 не нарушая условия Фано)</span>
1) .word
2) В консоли пиши <span>echo on>>C:\test.word
3) В консоли пиши C:/test.word
4) Да ничем по сути
5) VIM, easy motion (плагин для саблайма), стрелочками
6) В виме это X, D, C
7) В виме это v
8) Вот это уже сложно
9) Внимательно перечитать его
10) Создавай новый файл через консоль (</span>echo on>>C:\test2.word) и пиши правильно на сей раз
11) Она не используется
12) В буфере обмена скапливается грязь, которую нужно протирать, а в копилке ты хранишь свои копейки
13) Нажатием сочетания клавишь alt+F4
14) Для осуществления операции повторного ввода
15) Если посветить на них ультрафиолетом они появятся. Соблюдать нужно правила ПДД
16) Нарисовать маркером на экране монитора
17) Пишешь в конце документа: "Сегодня 20 июля 2011 года, и мы можем наблюдать сокращения численности населения в Осло". Эта вставка возможна в форматах .exe
Задача сделана на языке паскаль, при помощи
PaskalPlus<span>
Оформление сделана как для студенческой задачи
<span>Если есть вопросы пиши в личку</span></span>
П1 <-> П4 0 П0 ПП 09 ИП0 С/П
ИП4 ИП0 + П0 КИП4 ИП4 ИП1 - /-/ x<0 09 В/О
Процедура - с адреса 09.
Задача №1
var a:array[1..4, 1..5] of integer;
<span>i,j,k:integer; </span>
<span>begin </span>
<span>writeln('Заполните матрицу'); </span>
<span>for i:=1 to 4 do </span>
<span>for j:=1 to 5 do begin </span>
<span>read(a[i,j]); </span>
<span>if (a[i,j] mod 3=0) and (a[i,j]>20) then k:=k+a[i,j]; </span>
<span>end; </span>
<span>writeln('Сумма элементов кратных 3-м и > 20 = ',k); </span>
<span>end.
</span>
Задача №2
var a:array[1..5, 1..5] of integer;
<span>i,j,k:integer; </span>
<span>begin </span>
<span>writeln('Заполните матрицу'); </span>
<span>for i:=1 to 5 do </span>
<span>for j:=1 to 5 do begin </span>
<span>read(a[i,j]); </span>
<span>if i=j then k:=k+a[i,j]; </span>
<span>end; </span>
<span>writeln('Сумма элементов главной диагонали = ',k); </span>
<span>end.</span>