Напишите программу, которая заполняет массив из n элементов случайными целыми числами в диапазоне [ a , b ] и определяет максимальный среди чётных положительных элементов этого массива. входные данные входная строка содержит три числа: границы диапазона случайных чисел a и b , а также размер массива n . все числа разделены пробелами. гарантируется, что 0 < n ≤ 10000 . выходные данные в первой строке программа должна вывести n элементов построенного массива, разделив их пробелами, а во второй строке – максимальный из чётных положительных элементов этого массива. если в массиве нет таких элементов, программа должна вывести число -1. b паскале
123
260
Ответы на вопрос:
// pascalabc.net 3.1, сборка 1204 от 24.03.2016 begin var n,a,b: integer; read(a,b,n); var mas: =arrrandom(n,a,b); mas.println; var s: =mas.where(x-> x.iseven and (x> 0)); if s.any then writeln(s.max) else writeln(-1) end. тестовые решения: -10 100 20 52 57 39 5 52 40 94 -2 -7 24 65 -6 22 77 2 41 48 83 19 69 94 -10 -2 8 -6 -9 -2 -8 -3 -9 -4 -7 -1
Var s,st1: string; begin s: ='абвгдеёжзийклмнопрстуфхцчшщъыьэюя'; st1: =copy(s,3,1)+copy(s,6,1)+copy(s,25,1)+copy(s,15,1)+copy(s,16,1)+copy(s,19,1)+copy(s,20,1)+copy(s,30,1); writeln(st1); end.
Популярно: Информатика
-
Trollyz13.04.2020 22:57
-
07190000071926.06.2021 06:01
-
88188188120.05.2020 14:25
-
jumarova794616.06.2022 00:46
-
lover319.01.2023 12:21
-
nastya443118.01.2021 02:35
-
nekit1o618.02.2023 15:50
-
Albinnabel26.06.2021 06:58
-
moonlight281222.07.2021 19:40
-
Yleoliner26.05.2020 08:56