Question

В компьютер вводятся 10 любых целых чисел. Нужно подсчитать и один раз напечатать, сколько среди них положительных?

Answer 1

Var A,i,k:integer;
Begin
Write('Введите 10 целых чисел: ');
k:=0;
For i:= 1 to 10 do
    Begin
    Read(A);
    if A>0 then k:=k+1
    End;
Write('Количество положительных: ',k);
End.

Answer 2

Для подсчета количества положительных чисел среди 10 введенных целых чисел в компьютер, вам потребуется написать программу. Вот пример программы на языке Python, которая решает данную задачу:

count = 0

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

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

В этой программе мы используем цикл `for` для получения 10 чисел от пользователя. Затем мы проверяем каждое число и увеличиваем счетчик `count` на 1, если число положительное. В конце программы мы выводим количество положительных чисел.

Примечание: В данном примере предполагается, что пользователь будет вводить числа по одному и нажимать Enter после каждого числа. Если вы хотите ввести все числа одновременно, разделенные пробелами, вы можете использовать функцию `split()` для разделения строки на отдельные числа.

Надеюсь, это поможет вам решить задачу! Если у вас возникнут еще вопросы, не стесняйтесь задавать.