Регистрация
Vartur203
19.01.2022 17:37
Информатика
Есть ответ 👍

Дан одномерный массив на 15 элементов. переставить в обратном порядке элементы,расположенные между максимальным и минимальным элементами,включая их

189
386
Посмотреть ответы 2

Ответы на вопрос:

luizazamanov
luizazamanov
4,8(27 оценок)

program pr1; uses crt; var mas: array[1..15] of integer; i,max,min,b,v: integer; beginclrscr; for i: =1 to 15 do mas[i]: =random(10); for i: =1 to 15 do write(mas[i]); max: =0; min: =100000; b: =0; for i: =1 to 15 do begin if mas[i]> max then max: =i; if mas[i]< min then min: =i; end; if max> min then for i: =min to max div 2 do begin v: =mas[max-b]; mas[max-b]: =mas[i]; mas[i]: =v; b: =b+1; endelse for i: =max to min div 2 do begin v: =mas[min-b]; mas[min-b]: =mas[i]; mas[i]: =v; b: =b+1; end; writeln(); for i: =1 to 15 do write(mas[i]); end.

 

DanilSoldatkin
DanilSoldatkin
4,6(91 оценок)

Уже кому-то отвечал на этот во Я боюсь ошибиться, Великобритания и Германия или Испания

Популярно: Информатика