В группе учится 15 человек, каждый из которых имеет средний за последнюю сессию. Найдите номер самого отстающего студента Язык С, массив
227
410
Ответы на вопрос:
Const n = 25; var a: array[1..n] of real; i, j: integer; min, max: real; sum, product, harmonic: real; begin {ввод массива} writeln('данные массива: '); for i : = 1 to n do begin a[i] : = random(40) - 20; write(a[i], ' '); end; writeln(); {подсчет суммы и произведения и агригатов} sum : = 0; for i : = 1 to n do sum : = sum + a[i]; writeln('average = ', sum / n); {минимум и максимум} min : = a[1]; for i : = 1 to n do if min > a[i] then min : = a[i]; writeln('min = ', min); {подсчет суммы и произведения и агригатов} sum : = 0; for i : = 1 to n do if i mod 2 = 0 then {если нужен фильтр} sum : = sum + a[i]; writeln('sum = ', sum); end.
Популярно: Информатика
-
Danila2901200628.11.2020 07:45
-
TeReNoRi19.05.2021 01:22
-
foximmortal22.11.2021 11:00
-
stru4kovav1314.04.2021 00:47
-
tisochkin12329.02.2020 00:05
-
ul8a11.07.2021 19:22
-
умнаяпсина113.10.2020 11:53
-
мари42006.05.2022 21:04
-
мамкакактус14.05.2020 06:46
-
nikitka19982109.09.2022 05:16