Напишите программу, которая находит минимальный из нечётных положительных элементов массива. если в массиве нет нечётных положительных элементов, нужно вывести сообщение об этом
PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018 Внимание! Если программа не работает, обновите версию!
begin var a:=ArrRandom(ReadInteger('n='),-50,50); a.Println; var s:=a.Where(t->t.IsOdd and (t>0)); if s.Count=0 then Writeln('Нет нечетных положительнных') else s.Min.Println end.
import random mas = [random.randint(0,100) for i in range(40)] print('Всі числа:\n',mas) chonti = [] ne_chotni = [] for x in mas: if x%2 == 0: chonti.append(x) else: ne_chotni.append(x) print('Парные:\n',chonti) print("Непарные:\n",ne_chotni) if len(ne_chotni) == 0: print("В масиве немає нечотних елементов!") print("Минимальный с нечотних элементов:",min(ne_chotni))
Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(ReadInteger('n='),-50,50); a.Println;
var s:=a.Where(t->t.IsOdd and (t>0));
if s.Count=0 then Writeln('Нет нечетных положительнных')
else s.Min.Println
end.
Пример
n= 13
31 -5 -22 19 -30 21 -11 -28 -3 20 -19 36 -29
19
mas = [random.randint(0,100) for i in range(40)]
print('Всі числа:\n',mas)
chonti = []
ne_chotni = []
for x in mas:
if x%2 == 0:
chonti.append(x)
else:
ne_chotni.append(x)
print('Парные:\n',chonti)
print("Непарные:\n",ne_chotni)
if len(ne_chotni) == 0:
print("В масиве немає нечотних елементов!")
print("Минимальный с нечотних элементов:",min(ne_chotni))