Ответ:Ммм... Паскаль) Для этого сайты есть.
Объяснение:
avast!
Dr.Web 360 Total Security Kaspersky
Panda Free Antivirus
Norton Internet Security
ESET NOD32 Smart Security
F—Secure Internet Security
Bitdefender Internet Security
AVG Internet Security
<span><span>F = (¬A·¬B·C)v(¬A·B·¬C)v(¬A·B·C)v(A·¬B·¬C)v(A·B·C)
</span></span><span>Предлагаю Excel программку, которая эту функцию строит автоматически.
</span>
uses crt;
var
ar: array[1..19]of integer;
i, mul, sum, count, min, mini: integer;
begin
count := 0;
sum := 0;
mul := 1;
randomize;
for i := 1 to 19 do
begin
ar[i] := random(13) - 6;
mul := mul * ar[i];
if(ar[i] mod 2 = 0) then
begin
textbackground(green);
sum := sum + ar[i];
count := count + 1;
end;
if(ar[i] = 5) then
textbackground(red);
write(ar[i], ' ');
textbackground(black);
end;
writeln();
writeln('Произведение всех элементов массива = ', mul);
writeln('Сумма четных чисел = ', sum, ', количество = ', count);
min := ar[1];
mini := 1;
write('Номера элементов, равных 5: ');
for i := 1 to 19 do
begin
if(ar[i] = 5) then
write(i, ' ');
if((ar[i]) < min) then
begin
min := ar[i];
mini := i;
end;
end;
writeln();
writeln('Минимальный элемент = ', min, ', его номер = ', mini);
end.
Переведем 15 КБайт в биты:
15 * 1024 = 15360 байт
15360 * 8 = 122880 бит
Определим скорость передачи:
122880 / 60 = 2048 бит/c
Т.к. по заданию скорость увеличится на 2048 бит/c, видно, что она увеличится в два раза, следовательно файл будет передан в 2 раза быстрее, т.е. за 30 секунд.
Ответ: 30 секунд.