Синформатикой требуется заполнить массив именно так: x = [3 4 7 8 11 12] какой оператор надо поместить в тело цикла вместо многоточия? for k: =1 to 6 do begin end; 1) x[k] : = 3*k - k mod 2 2) x[k] : = 2*k + k mod 2 3) x[k] : = 2*k - k mod 2 4) x[k] : = 2*k + k div 2 5) x[k] : = 2*(k - 1) ответ -? mod(берется остаток) div(целое число берется)

Ответ:   2) x[k] : = 2*k + k mod 2

// pascalabc.net 3.0, сборка 1111 begin   var n: =readinteger('длина последовательности= ');   var a: =readarrreal('вводите члены последовательности'+#13#10,n);   var k: =a.takewhile(x-> x< > 0).count;   if k=n then writeln('ноль в последовательности не найден')   else writeln('количество членов, включая первый нулевой: ',k+1) end. тестовое решение: длина последовательности= 10 вводите члены последовательности -5.2 7 2.7 -3.18 6.11 0 -1.02 3.14 -3.8 -4 количество членов, включая первый нулевой: 6

Итак. 2^18 = 262 144 бита в секунда.  1 мб = 2^23 бит =  8388608 бит следовательно, 262 144 бита в секунду  = 0,03125 мбайта в секунду. сейчас посчитаем время для передачи несжатого файла: время = объем / скорость => время = 5 / 0,03125 = 160 секунда. сейчас, время на сжатый архив. его объем = 20 процентов от 5 мб = 1 мб время на передачу: 1 / 0,03125 = 32 секунд  прибавляем время операций с архивом: 32 + 7 + 1 = 40 секунд очевидно, что вариант а быстрее. причем, на 120 секунд. ответ: а120