Створіть
програму для знаходження кількості додатніх елементів масиву всі елементи якого є цілі числа.
Алгоритм роботи
1. Відкрийте середовище програмуванн IDLE. Створіть новий файл.
2. Створіть порожній список.
a=[]
3. Заповніть список елементами кількість елементів та самі елементи користувач буде вводити з клавіатури та виведіть список на екран
print("Введіть кількість елементів масиву")
n=int(input("n= "))
for i in
range(1,n+1):
print("a[", i,"]=", end=" ")
a.append(int(input()))
print(a)
4. Встановіть початкове значення кількості елементів 0.
k=0
5. Створіть цикл з лічільником, для підрахунку всіх додатніх елементів списку.
for i in range(0,n):
if a[i]>0:
k+=1
6. Виведіть на екран кількість додатніх елементів списку.
print("Кількість додатніх елементів масиву дорівнює",k)

ответ:Событие: решение задачи. Источник ифнормации: учитель. Приемник информации: ученик. Информационный носитель: доска.

Событие: измерения давления. Источник ифнормации: пациент. Приемник информации: врач. Информационный носитель: тонометр.

Событие: воспроизведение аудиофайла. Источник информации: пользователь. Приемник информации: сайт. Информациональнный носитель: ПК/телефон.

Событие: воспроизведение: видео и аудиофайла. Источник информации: пользователь. Приемник информации: телевизор. Информациональный носитель: телевизор.

Событие: воспроизведение музыкального фрагмента в живую. Источник информации: ученик. Приемник информации: ближайшие слушатели. Информациональнный носитель: гитара.

Объяснение:

Написал на том, что было под рукой: 1C

Если Квартира > ЭтажейВДоме * КвартирНаЭтаже Тогда  

 Сообщить("Нет такой квартиры в доме, мало этажей!");

ИначеЕсли Квартира <= КвартирНаЭтаже Тогда  

 Сообщить("Живет на первом этаже");

Иначе

 ЖиветНа = Цел(Квартира / КвартирНаЭтаже);

 ОстатокЭт = Квартира%КвартирНаЭтаже;

 Если ОстатокЭт>0 Тогда  //

  ЖиветНа = ЖиветНа+1;

 КонецЕсли;

 Если ЖиветНа%2=0 И ЖиветНа=ЭтажейВДоме Тогда // это четный и последний

  ВыходитьНа = ЖиветНа-1;

 ИначеЕсли ЖиветНа%2=0 Тогда // четный в НЕчетный этаж

  ВыходитьНа = ЖиветНа+1;

 Иначе

  ВыходитьНа = ЖиветНа;

 КонецЕсли;

 Сообщить(" Выйдет на: "+ВыходитьНа);

КонецЕсли;