Пояснение: заполни массив 10-ю элементами и он выдаст то, что тебе нужно var arr: array [1..10] of integer; var i,min,max: integer; begin for i: =1 to 10 do begin writeln('введите ',i,' элемент'); readln(arr[i]); end; min: =0; max: =0; for i: =1 to 10 do begin if (arr[i]< 0) then begin if (arr[i]< min) then begin min: =arr[i]; end; end else if (arr[i]> 0) then begin if (arr[i]> max) then begin max: = arr[i]; end; end; end; writeln('минимальный элемент среди отрицательных чисел ',min); writeln('максимальный элемент среди положительных чисел ',max); end.
yyyaga
17.04.2023
10 код на python 3.5: from itertools import groupby n = 1000 primes = [2, 3] i = 1 while true: if all((6 * i - 1) % p ! = 0 for p in primes): primes.append(6 * i - 1) if len(primes) == n: break if all((6 * i + 1) % p ! = 0 for p in primes): primes.append(6 * i + 1) if len(primes) == n: break i += 1 bin_string = ''.join(list(map(lambda p: bin(p)[2: ], lengths = [len(list(g)) for k, g in groupby(bin_string) if k == '0'] print(max(lengths))