Написать программу для решения задачи: Произвольно вводится одномерный массив из 15 целых чисел, все числа больше -10 и меньше 10. Вывести массив на экран. Найти наименьшее четное число и наибольшее нечетное число. Посчитать количество нулей в массиве. Заменить отрицательные числа числом 300 и вывести измененный массив на экран

PascalABC.Net

begin  var a := ArrRandom(15, -10, 10);  Println('Массив', a);  Println('Наименьшее четное: ', a.Where(x -> not Odd(x)).Min);  Println('Наибольшее нечетно: ', a.Where(x -> Odd(x)).Max);  Println('Колличество нулей: ', a.Where(x -> x = 0).Count);  Print('Измененный массив: ');  for var i := 0 to High(a) do    if a[i] < 0 then    begin      a[i] := 300;    end;  Print(a); end.

2гбайта=2000000байт

2000000байт/400байт=5000текстовых файлов

если 2 сервера за 2 секунды могут обработать 2 миллиона запросов, то один сервер за 2 секунды обрабатывает 1 миллион запросов.

тогда за 6 секунд 1 сервер обрабатывает  1*3 = 3 миллиона запросов, а шесть серверов, соответственно, в 6 раз больше = 18 миллионов запросов.

 

ответ: 18 млн запросов.