Const n = 40; var x: array[1..n] of integer; procedure initmas(p: integer); var i: integer; begin writeln('элементы массива'); for i : = 1 to p do begin x[i] : = random(101) - 50; write(x[i]: 4); end; writeln end; function avg(m: integer): real; var i, s: integer; begin s : = 0; for i : = 1 to m do s : = s + x[i]; avg : = s / m end; begin randomize; initmas(10); writeln('среднее арифметическое равно ', avg(10)) end. тестовое решение: элементы массива 44 -40 -1 9 48 -12 48 -39 -13 32 среднее арифметическое равно 7.6
Yelena_Gennadevna
19.09.2022
#include < stdio.h> int main() { const int k = 10; int n = 5 + k % 5; int savednumbers[n]; for (int i = 0; i < n; i++) { scanf("%d", & savednumbers[i]); } int a; scanf("%d", & a); for (int i = 0; i < n; i++) { if (a == savednumbers[i]) { printf("first in - %d.", i + 1); return 0; } } printf("no number a."); return 0; }