В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
missiskitten
missiskitten
07.02.2021 07:17 •  Информатика

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

Показать ответ
Ответ:
Dion111
Dion111
23.10.2020 10:12
Вот в двоичной системе:
110010001100110111010100110011101101000011001100110000001101001011001000110010101100000000100000100101110010000011011101110100101100111000100000110011011100000011010011110010101100000000100000110011100010000011010001110011111100111011010001110011101100000111000000110101010010000011001111110011101100101111010011110101111100010111001101110010001101111100101100001000001100110111000000110010101100111011001111110010111100010111001101110010001101111100101100001000001100111011000001110100001100000011000001110011101101001011001010110010000010110000100000110011111100010111010000110001011100010011000000110101111100100000100000110010000010000011001111110100001100010111000100110100011101001011000000110000101100101111000101110011011100100011011111001000001100100011001101110101001100111011010000110011001100000011010110110010001100100000101110
0,0(0 оценок)
Ответ:
Darwin111
Darwin111
16.12.2020 19:54

===== 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.


Разработайте процедуру, которая преобразует дату из классического вида (15 мая 2019 года) в числовой
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота