Составьте программу, которая заполняет массив a [1… 10] случайными целыми числами в…

Question

45

Составьте программу, которая заполняет массив a [1… 10] случайными целыми числами в диапазоне от 1 до 10 и вычисляет среднее арифметическое элементовмассива.0

категория: информатика

ответить

в избранное ссылка

Знаете ответ?

taproot · Accepted Answer

77

taproot

19 февраля 2023

Const N=10; var a: array [1… N] of integer; i,sum: integer; sr: real; begin sr: =0; sum: =0; for i: =1 to N do begin a[i]: =random (10)+1; sum: =sum+a[i]; end; for i: =1 to N do write (a[i]: 3); writeln; sr: =sum/10; writeln ('Среднее значение элементов массива: ',sr); end.

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: