1. напишите программу, которая находит максимальный и минимальный из чётных положи- тельных элементов массива. если в массиве нет чётных положительных элементов, нужно вывести сообщение об этом. 2. введите массив с клавиатуры и найдите (за один проход) количество элементов, имеющих максимальное значение. 3. найдите за один проход по массиву три его различных элемента, которые меньше всех ос- тальных («три минимума»). 4. *заполните массив случайными числами в диапазоне 10..12 и найдите длину самой длинной последовательности стоящих рядом одинаковых элементов на питоне ! )
194
269
Ответы на вопрос:
1. a=() f=-1 for i in range(len(a)): if int(a[i])> 0 and int(a[i])%2==0: if f==-1: min1=int(a[i]) max1=int(a[i]) f=1 elif int(a[i])> max1: max1=int(a[i]) elif int(a[i])< min1: min1=int(a[i]) if f==-1: print('not solution') else: print('max=',end='') print(max1) print('min=',end='') print(min1) 2. a=() k=0 max1=float(a[0]) for i in range(len(a)): if float(a[i])==max1: k+=1 elif float(a[i])> max1: k=1 max1=float(a[i]) print(k) 3.a=()min1=float(a[0])min2=float(a[0])min3=float(a[0])for i in range(len(a)): if float(a[i])< min1: min3=min2 min2=min1 min1=float(a[i]) elif float(a[i])< min2: min3=min2 min2=float(a[i]) elif float(a[i])< min3: min3=float(a[i])print(min1)print(min2)print(min3)
Var a,b,c: integer; begin readln(a,b,c); if ((a< b) and (a< c)) then writeln(a) else if ((b< a) and (b< c)) then writeln(b) else if ((c< a) and (c< b)) then writeln(c); if ((a> c) and (c> b)) then writeln(c) else if((b> c) and (b< a)) then writeln(b) else if ((b> a) and (a> c)) then writeln(a); if ((a> b) and (a> c)) then writeln(a) else if ((b> c) and (b> a)) then writeln(b) else if ((c> a) and (c> b)) then writeln(c); end.
Популярно: Информатика
-
BeNetCat18.07.2020 10:40
-
akrikay1324.11.2021 00:47
-
iququwisjjs09.01.2020 10:25
-
Димончик11111110.06.2020 10:09
-
sadgerl505.07.2022 06:44
-
саша424605.03.2020 10:18
-
Kesha444411.03.2022 22:01
-
КкапризЗ07.09.2022 04:31
-
LIMON4IKBRO05.06.2023 03:34
-
Дашенька136502.01.2020 21:01