Дана таблица из 15 целых чисел. найти среднее значение квадратов этих чисел.
291
497
Ответы на вопрос:
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.
Вам необходимо зайти на сайт например куй или юлмарт и выбрать компьютер в сборе, что-нибуть в районе 12-15 т.р. без ос, т.к. из игр вам там нужен будет пасьянс, а для офисных приложений этого хватит в качестве ос win7 цену посмотреть в прайсе ms office цена там-же и ваши спецпрги типа 1c цена там-же вот и все
Популярно: Информатика
-
astanina04215.08.2022 01:55
-
АлексаФокс31.07.2021 01:59
-
KINGAsyaKING28.02.2021 04:42
-
KADANCHUK31.05.2023 00:32
-
FTA72артем29.03.2023 22:10
-
elmirayanbukov27.01.2022 08:09
-
darilinamoo02.02.2021 22:19
-
logoschaolj27.11.2022 11:53
-
bahriddinJoN208526.01.2021 06:10
-
LilyBlackk05.12.2022 09:20