Есть ответ 👍

Поменять местами max и min элементы и вывести массив 1 max и порядковый номер , 2 min и порядковый номер

237
458
Посмотреть ответы 2

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


Uses crt; var x: array[1..10]of real; i: integer; min,max: real; begin clrscr; min: =9999999; max: =-9999999; for i: =1 to 10 do begin x[i]: =exp(i*(-1))*(sqr(i)-3*i); if x[i]< min then min: =x[i]; if x[i]> max then max: =x[i]; writeln(x[i]: 1: 5); end; writeln('измененный массив с максимальным=',max: 1: 5,' и минимальным=',min: 1: 5); for i: =1 to 10 do begin if x[i]=min then writeln(max: 1: 5); if x[i]=max then writeln(min: 1: 5); if (x[i]< > min)and(x[i]< > max)then writeln(x[i]: 1: 5); end; end.

Сторуха , старик , золотая рыбка . 3 желания , море и т.д

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