Question

напишите программу которая в последовательности целых чисел определяет количество положительных чисел​

Answer 1

var a,i,k,sum:integer;

begin

read(a); //кол-во числе в последовательности

for i:=1 to a do begin

read(k);

if(k>=0)then sum:=sum+1; //проверка на положительное число

end;

write(sum);

end

Answer 2

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

Вот пример программы на языке Python:

pythonCopy code
def count_positive_numbers():
    count = 0

    while True:
        try:
            number = int(input("Введите целое число (для завершения введите 0): "))
            if number == 0:
                break
            elif number > 0:
                count += 1
        except ValueError:
            print("Ошибка: Введите целое число!")

    return count

if __name__ == "__main__":
    result = count_positive_numbers()
    print(f"Количество положительных чисел в последовательности: {result}")

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