В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История

Дан массив, содержащий 2016 положительных целых чисел, не превышающих 1000. необходимо найти и вывести максимальный из тех элементов этого массива, шеснадцатиричная запись которых содержит ровно 2 цифры. если таких чисел в массиве нет, ответ считается равным нулю. исходные данные объявлены так, как показано ниже. запрещается использовать переменные, не описанные ниже, но разрешается не использовать часть из описанных. const n=2016; var a: array [1..n] of integer; i, m, k: integer; begin for i: =1 to n do readln(a[i]); … end. в качестве ответа вам необходимо фрагмент программы, который должен находиться на месте многоточия. вы можете записать решение также на другом языке программирования (укажите название и версию языка программирования). в этом случае вы должны использовать те же самые исходные данные и переменные, какие были предложены в условии.

Показать ответ
Ответ:
катя4842
катя4842
05.10.2020 15:17
Const N=2016; 
var 
a: array [1..N] of integer; 
i, m: integer; 
begin 
for i:=1 to N do a[i]:=random(1001)+1;
// readln(a[i]);
m:=0;
// 10(16) = 16(10); FF(16)=16*15+15=255
for i:=1 to n do
 if (a[i]>=16)and(a[i]<=255)and(a[i]>m)
   then m:=a[i];
writeln('m = ',m);
end. 

Пример:
m = 254
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота