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

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

Задать свой вопрос
Алиса Ветлицкая
такую программу минимум за 20 напишу :)
Лобозова Надежда
А я за 2 минутки напишу и просто так могу даже)
1 ответ
// PascalABC.NET 3.1, сборка 1198 от 11.03.2016
begin
  var a:=ReadArrInteger(10);
  Writeln('Кол-во=',a[0:9:2].Where(x-gt;xgt;0).Count)
end.

Тестовое решение:
3 -5 4 -2 -3 0 4 -1 -8 2
Кол-во=3

Алёна Ращинская
я на питоне, там всё труднее
Danil Egorovin
Да... огромное достижение писать на Питоне, где "все сложнее" )))
Ламбрев Олег
какой учил, на том и пишу
Вероника Шайхей
я же не программер, так хобби :)
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

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

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт