Задать массив размерности 25 случайным образом…

Question

Задать массив размерности 25 случайным образом от -10 до 9. Поменять местами первый минимальный и последний максимальный элементы массива. Вывестипервоначальный массив и получившийся массив. Помогите решить в паскале

Answer 1

33

balanceuuiii

29 марта 2023

const n=25; var a: array[1… n] of integer; i, num, num1, min, max: integer; begin min: =10; max: =0; for i: =1 to n do begin a[i]: =random (20) — 10; write (a[i], '); if (a[i] < min) and (min=10) then begin min: =a[i]; num: =i; end; if (a[i] > max) then begin max: =a[i]; num1: =i; end; end; a[num]: =max; a[num1]: =min; writeln; for i: =1 to n do write (a[i], '); end.

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: