Этапы, которых стоит придерживаться при разработке любых баз данных:
Сопровождение базы данных
Разработка и создание диаграмм.
Тестирование ввода данных в таблицы.
Выяснение задач, для которых будет использоваться разрабатываемая база.
104
288
Ответы на вопрос:
Const n=15; var i,k,mn,indm,sm: integer; a: array[1..n] of integer; sar: real; begin randomize; writeln('исходный массив: '); mn: =n; sm: =0; k: =1; for i: =1 to n do begin a[i]: =random(-n,n); sm: =sm+a[i]; write(a[i],' '); if a[i]=mn then k: =k+1; if a[i]< mn then begin mn: =a[i]; indm: =i; k: =1; end; end; writeln; writeln('минимальный элемент: ',mn,' индекс: ',indm); sm: =sm-a[indm]*k; writeln('сумма элементов без минимального: ',sm); sar: =sm/(n-k); writeln('среднее арифметическое: ',sar: 7: 3); end.исходный массив: -1 6 -12 -14 14 -14 10 -9 -2 -6 9 -1 -13 13 -2 минимальный элемент: -14 индекс: 4 сумма элементов без минимального: 6 среднее арифметическое: 0.462
Популярно: Информатика
-
didenkoelenam06.02.2022 05:26
-
xvukvkee24.12.2020 04:21
-
PolinaFox600213.11.2020 22:33
-
привет891725.02.2023 17:24
-
Hilet23.04.2020 21:58
-
Мария05m18.01.2023 01:22
-
wehter8317.03.2020 11:25
-
Dana190608.12.2022 06:20
-
PolyMoly102.08.2022 06:35
-
mcanya112.10.2021 10:57