Question

Ввести N разных чисел. Найти количество положительных чисел

Answer 1

Var
   N,A,k:integer;
Begin
Write('N = ');
ReadLn(N);
k:=0;
For N:= 1 to N do
    Begin
    Read(A);
    if A>0 then k:=k+1;
    End;
WriteLn('Кол-во положительных, среди введённых: ',k);
End.

Answer 2

Конечно! Чтобы найти количество положительных чисел из N разных чисел, вам необходимо ввести эти N чисел и затем проанализировать каждое число, чтобы определить, является ли оно положительным или отрицательным. Здесь есть несколько способов решить эту задачу. Давайте рассмотрим один из них.

Алгоритм:

1. Запросите у пользователя количество чисел N. 2. Создайте переменную счетчика для хранения количества положительных чисел и установите ее значение равным нулю. 3. Запросите у пользователя N разных чисел и сохраните их в отдельные переменные. 4. Проверьте каждое число, используя условное выражение (if), чтобы определить, является ли оно положительным (больше нуля). 5. Если число положительное, увеличьте значение переменной счетчика на единицу. 6. Повторите шаги 4-5 для каждого из N чисел. 7. Выведите значение переменной счетчика, которое будет представлять количество положительных чисел.

Пример кода на языке Python:

N = int(input("Введите количество чисел: "))
positive_count = 0

for i in range(N):
    num = int(input("Введите число: "))
    if num > 0:
        positive_count += 1

print("Количество положительных чисел:", positive_count)

Теперь вы можете ввести число N и последовательно ввести N разных чисел. После этого программа выведет количество положительных чисел из введенной последовательности.