Известный за и количество найденных по ним страниц некоторого сегмента сети Интернет.
Чему равен X, если все за выполнялись практически одновременно, т.е. во время выполнения за набор страниц, содержащих все искомые слова, не изменился.

Притянуто "за уши", но такое уж задание несуразное. Видимо, для старых версий языка.

// PascalABC.NET 3.2, сборка 1353 от 27.11.2016
// Внимание! Если программа не работает, обновите версию!

function Summa(a:array of integer):=a.Sum;

begin
  var a:=ArrRandom(10,-99,99); a.Println; Writeln;
  var b:=ArrRandom(20,-99,99); b.Println; Writeln;
  var c:=ArrRandom(30,-99,99); c.Println; Writeln;
  Writeln('S=',Summa(a)+Summa(b)+Summa(c))  
end.

Пример
53 34 13 64 79 28 -98 -43 -19 23

96 -18 48 61 -70 -16 92 0 27 65 -68 -17 -77 90 -13 69 46 85 71 -44

-21 65 -56 31 56 25 37 50 -35 52 91 -94 12 -98 -51 -73 6 -31 -7 -32 35 -88 -53 63 -93 -29 11 22 -23 -89

S=244

Я так понимаю, массив должен быть заполнен случайными числами? Если нет - отпишите в комментариях, скину код, где элементы массива вводятся с клавиатуры
При копировании кода из IDE на сайт автоматически убирается перенос строки. Будет прикреплен скриншот с тем, как должен выглядеть код

#include <stdlib.h>#include <stdio.h>#include <locale.h>
void main(){ setlocale(LC_ALL, "RUSSIAN"); int mas[11], i, ad, ben; ad = 0; ben = 0; srand(8120); for (i = 1; i <= 10; i++) //цикл заполнения массива случайными числами mas[i] = rand() % 200 - 100; for (i = 1; i <= 10; i++) //цикл вывода массива на экран { printf("%2d ", mas[i]); if (i % 5 == 0)printf("\n"); } for (i = 1; i <= 10; i++) // цикл подсчета количества отрицательных и положительных элементов массива { if (mas[i] > 0)ben++; if (mas[i] < 0)ad++; } printf("\n Количество положительных чисел: %2d", ben); printf("\n Количество отрицательных числе: %2d", ad); printf("\n\n"); system("pause");}