якими бувають інформаційні системи?Як інформаційні системи використовують ваші батьки? назвіть приклади
191
329
Ответы на вопрос:
12 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 program sort; type a=array[1..1000]of integer; var m: a; i,n: integer; procedure sortm(var m: a; n: integer); //сортировка массива var i,j,buf: integer; begin for i: =1 to n do for j: =i+1 to n do if(m[i]> m[j]) then begin buf: =m[j]; m[j]: =m[i]; m[i]: =buf; end; end; begin randomize; read(n); for i: =1 to n do m[i]: =random(999); sortm(m,n); for i: =1 to n do write(' ',m[i]); end.
Популярно: Информатика
-
comr4de26.03.2021 16:17
-
nikolaivanov1103.07.2021 13:13
-
Аленка124231.07.2022 14:47
-
владосик1329.10.2022 05:56
-
olga312boo10.07.2022 17:29
-
VanessaQueen18.10.2021 16:22
-
shuraKotokoto01.03.2023 02:12
-
ZheniaBabich10.01.2022 20:35
-
Victor78911.11.2021 12:07
-
ivan44526.08.2021 11:56