Написать программу на Pascal, либо C++ и составить блок-схему
Даны натуральные числа A1,A2... Признак конца последовательности 99. Найти количество положительных чисел и удвоенное количество отрицательных чисел.

Подключи библиотеки iostream и Windows.h

int main() {

int nNumsCount = 0,

pNumsCount;

int number = 0;

while(std::cin >> number && number != 99){

if(number < 0)

++nNumsCount;

if(number > 0)

++pNumsCount;

}

std::cout << pNumsCount << '' << 2*nNumsCount << std::endl;

system("pause");

return 0;

}