ПОМОГИТЕ РЕШИТЬ! ЗАВТРА СДАВАТЬ. Дан массив А (15)

Question

ПОМОГИТЕ РЕШИТЬ! ЗАВТРА СДАВАТЬ. Дан массив А (15). Заполните его случайными числами из диапазона -27 до 34. Максимальный и минимальный элементыпоменяйте местами.

Answer 1

45

breez

17 марта 2023

Program z1; Uses CRT; Var a: array [1… 15] of integer; i,max,min,c: integer; Begin Clrscr; randomize; For i: =1 to 15 do Begin a[i]: =-27+random (61); write (a[i]: 4); End; {ищем максимум} Max: =a[1]; For i: =1 to 15 do If a[i]>max then max: =a[i]; {ищем минимум} Min: =a[1]; For i: =2 to 15 do If min

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

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

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

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

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