В программе Excel для фиксации применяется значок - $
В зависимости, где расположен знак $ , будет происходит фиксацию либо столбика $A1, либо строки A$1, либо строки и столбика одновременно $A$1.
Предлагаемая формула имеет вид =$A1+B$1
где $A1 - зафиксирован столбик А, ячейка при копировании меняется;
B$1 - зафиксирована ячейка, столбец при копировании меняется.
Таким образом при копировании формулы =$A1+B$1 из ячейки С1 в ячейки С2 и С3 (в пределах столбика С), будет меняться номер ячейки А.
Результат копирования :
ячейка С2 ⇒ =$A2+B$1
ячейка С3 ⇒ =$A3+B$1
При копировании формулы =$A1+B$1 из ячейки С1 в ячейку В1 , будет меняться номер (наименование) столбика В на столбик С, а при копировании в пределах столбца В будет меняться только номер ячейки А.
Результат копирования :
ячейка В1 ⇒ =$А1+С$1
ячейка В2 ⇒ =$A2+С$1
ячейка В3 ⇒ =$A3+С$1
Результат вычисления ниже.
Var
x,y:integer;
a:array [1..12] of string;
begin
a[1]:=cock;
..
a[12]:=monkey;
read(x);
y:=(abs(2016-x) )mod 12;
write(a[y]);
end.
Вроде должно работать. Проверить не могу - сижу с телефона
1) неудобство чтенья
2) для того чтоб вставить какой-то редкий символ его надо искать в таблице символов
3) неудобно писать вычисления типа математических (много символов)
4) неудобно сравнивать далеко стоящие друг от друга куски текста
5) неудобно делать пометки и комментарии к тексту