63

Дан вектор размером N поменять местами максимальный и минимальный…

pantera 16 апреля 2023

Дан вектор размером N поменять местами максимальный и минимальный элементы (пожалуйста решите, я ничего не понимаю, весь день делаю неполучается.)

категория: информатика

49

uses crt; var n,i,k,k1,m,min,max: integer; a: array[1… 1000] of integer; beginrandomize; read (n); for i: =1 to n do begin a[i]: =random (101) -50; if maxa[i] then begin k1: =i; min: =a[i]; end; write (a[i],'); end; writeln; m: =a[k]; a[k]: =a[k1]; a[k1]: =m; for i: =1 to n do write (a[i],'); end.

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

Знаете другой ответ?
Другие вопросы по информатике

ПОПУЛЯРНОЕ
Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...