Program n1; const n=5; var a: array [1..n] of integer; i,S: integer; begin writeln('дано ',n,' чисел;'); for i:=1 to n do begin write('введите ',i,' число: '); readln(a[i]); end; for i:=1 to n do S:=S+a[i]; writeln('среднее арифм: ',S/n); end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
