6. Отметьте все формулы, которые НЕ изменятся при копировании из ячейки C6 в ячейку C8.
=$A5+B$2
=$A$5+$B$2
=$A$5+B$2
=A$5+B$2
=A$5+$B2
7 Отметьте все формулы, которые НЕ изменятся при копировании из ячейки C6 в ячейку D6.
=$A5+$B2
=$A$5+$B$2
=$A$5+$B2
=A$5+B$2
=A$5+$B2
8. Отметьте все формулы, которые НЕ изменятся при копировании из ячейки C6 в ячейку D8.
=$A5+$B2
=$A$5+$B$2
=$A$5+$B2
=A$5+B$2
=A$5+$B2
110010001100110111010100110011101101000011001100110000001101001011001000110010101100000000100000100101110010000011011101110100101100111000100000110011011100000011010011110010101100000000100000110011100010000011010001110011111100111011010001110011101100000111000000110101010010000011001111110011101100101111010011110101111100010111001101110010001101111100101100001000001100110111000000110010101100111011001111110010111100010111001101110010001101111100101100001000001100111011000001110100001100000011000001110011101101001011001010110010000010110000100000110011111100010111010000110001011100010011000000110101111100100000100000110010000010000011001111110100001100010111000100110100011101001011000000110000101100101111000101110011011100100011011111001000001100100011001101110101001100111011010000110011001100000011010110110010001100100000101110
===== PascalABC.NET =====
procedure DateNum(s1: string; var s2: string);
begin
s1 := s1.MatchValue('\d{1,2}\s\w{3,}\s\d{1,4}\sгода');
if s1.Length > 0 then
begin
var aw := s1.ToWords;
s2 := aw[0] + '.';
var m := Arr('января', 'февраля', 'марта', 'апреля',
'мая', 'июня', 'июля', 'августа', 'сентября',
'октября', 'ноября', 'декабря');
var i := m.FindIndex(w -> w = aw[1]);
if i >= 0 then
s2 += (i + 1).ToString + '.' + aw[2]
else s2 := ''
end
else
s2 := ''
end;
begin
var s1 := 'Сегодня 12 декабря 2019 года, четверг';
var s2: string;
DateNum(s1, s2);
if s2.Length > 0 then
Println(s2)
else
Println('Дата записана некорректно')
end.