Вопрос по информатике:
Дан массив из М чисел. Найдите все элементы массива с индеком больше индекса максимального значения массива
помогите срочно!!!!!!!!!!!!!!
- 20.12.2017 01:00
- Информатика
- remove_red_eye 13316
- thumb_up 30
Ответы и объяснения 1
Const m=10;
var
a: array [1..m] of integer;
i, imax: integer;
begin
for i:=1 to m do
begin
write('a[', i, '] = ');
readln(a[i]);
if i=1 then
imax:=i;
if a[i]>a[imax] then
imax:=i
end;
if imax
for i:=imax+1 to m do
write(a[i], ' ');
end
else
writeln('Максимальный элемент - последний');
end.
- 21.12.2017 08:59
- thumb_up 35
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.