Тема массив. Напишите на Паскале программу…

Question

Тема массив. Напишите на Паскале программу, которая запрашивает с клавиатуры массив из N чисел, а затем выводит среднее арифметическое всех элементовмассива.

Answer 1

58

outposter

06 марта 2023

vari,a,N: integer; sr: real; begin write ('Vvedite N='); readln (N); // Вводите количество чисел в массиве и одновременно вводите диапозон массива от 1 до N randomize; for i: =1 to N dobegina: =random (N); write (a,'); sr: =sr+a; //Значения массива складываютсяend; sr: =(sr / N); //Сумма значений массива делится на количество значенийwriteln ('srednee arifmeti4eskoe=',sr: 1:2); //Выводится среднее арифметическоеreadln; end.

пользователи выбрали этот ответ лучшим

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

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

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

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