Question

Написать программу, в которой пользователь вводит несколько чисел, программа выводит количество положительных чисел.

Answer 1

program cycle_for;
var i,kn : byte; x:real;
begin
   kn:=0;
     for i:=1 to 10 do
       begin
          writeln('Введите ',i,' число: ');
          readln(x);
       if x>0 then kn:=kn+1 {увеличиваем кол-во на 1}
end;
   writeln('Вы ввели ',kn,' положительных чисел.');
readln
end.

Answer 2

Я могу помочь вам написать программу, которая выводит количество положительных чисел, введенных пользователем. Вот один из возможных вариантов решения этой задачи на языке Python:

# Запрашиваем у пользователя количество чисел, которые он хочет ввести
n = int(input("Сколько чисел вы хотите ввести? "))

# Создаем переменную для подсчета положительных чисел
count = 0

# В цикле n раз запрашиваем у пользователя число и проверяем его знак
for i in range(n):
    # Запрашиваем у пользователя число
    x = int(input(f"Введите {i+1}-е число: "))
    # Если число положительное, увеличиваем счетчик на 1
    if x > 0:
        count += 1

# Выводим результат на экран
print(f"Количество положительных чисел: {count}")

Эта программа работает следующим образом: - Сначала программа запрашивает у пользователя, сколько чисел он хочет ввести, и присваивает это значение переменной `n`. - Затем программа создает переменную `count`, которая будет хранить количество положительных чисел. Изначально она равна нулю. - Далее программа входит в цикл, который повторяется `n` раз. На каждой итерации цикла программа запрашивает у пользователя очередное число и присваивает его переменной `x`. - Потом программа проверяет, является ли число `x` положительным, то есть больше нуля. Если это так, то программа увеличивает значение переменной `count` на единицу, то есть добавляет еще одно положительное число к счетчику. - Наконец, после окончания цикла, программа выводит на экран значение переменной `count`, которое равно количеству положительных чисел, введенных пользователем.

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