Question

-30 до 30. Подсчитайте в этом массиве количество положительных и количество отрицательных чисел.

Answer 1

PascalABC.Net

• begin
•  var x := ReadInteger('Введите длину массива');
•  var a := ArrRandom(x, -30, 30);
•  Println('Массив', a);
•  Println('Положительных: ', a.Where(y -> y > 0).Count);
•  Println('Отрицательных: ', a.Where(y -> y < 0).Count);
• end.

Answer 2

Хорошо, давайте подсчитаем количество положительных и отрицательных чисел в массиве от -30 до 30.

Массив от -30 до 30 включает все числа от -30 до 30, включительно. Таким образом, у нас есть 31 отрицательное число (от -30 до -1) и 31 положительное число (от 1 до 30).

Подсчет:

• Количество положительных чисел: 30 - 1 (исключаем ноль) + 1 = 30
• Количество отрицательных чисел: -1 - (-30) + 1 = 30

Таким образом, в массиве от -30 до 30 есть 30 положительных чисел и 30 отрицательных чисел.