Вопрос по информатике:
Заполнить массив 20 случайными числами (использовать генератор случайных чисел). Найти в массиве максимальный элемент и вывести на экран его значение и порядковый номер в массиве.
Пожаловаться
- 10.07.2018 18:05
- Информатика
- remove_red_eye 15589
- thumb_up 82
Ответы и объяснения 1
uses crt; var arr:array[1..20]ofinteger; max,q,maxq:integer; beginwriteln('ARRAY: '); for q:=1to20do begin arr[q]:=random(80); writeln(q:2,arr[q]:6); end; max:=arr[1]; for q:=2to20do if arr[q]>max then begin max:=arr[q]; maxq:=q; end; writeln; write('MAX = ',max,' (П. НОМЕР ',maxq,')'); end.
Пожаловаться
- 11.07.2018 05:11
- thumb_up 40
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.
Новые вопросы
Интересные вопросы