Создать программу в паскале, 9 класс поменять местами первый элемент масива и максимальный. заранее ) ) ) var a: array [1..20] of integer;
193
237
Ответы на вопрос:
Var a: array[1..50] of integer; i,n,max,r: integer; begin randomize; readln(n); for i: =1 to n do begin a[i]: =random(50)-25; write(a[i]: 4); end; writeln; max: =1; for i: =1 to n do if a[i]> a[max] then max: =i; r: =a[1]; a[1]: =a[max]; a[max]: =r; for i: =1 to n do write(a[i]: 4); readln end.
Популярно: Информатика
-
shvok19.02.2022 20:19
-
Алекс77777727.07.2020 08:51
-
abdulla80526.12.2022 17:13
-
bananchik927.02.2020 08:54
-
Voprosik469526.11.2020 07:33
-
marina0203200607.11.2022 09:30
-
56444430.08.2020 14:23
-
88188188123.09.2021 06:31
-
Даня168106.08.2020 22:58
-
янубтытруп11.04.2021 13:39