• Предмет: Информатика
  • Автор: gufufhgjvjghg
  • Вопрос задан 6 лет назад

ПОЖАЛУЙСТА, ПОМОГИТЕ МНЕ...
ОЧЕНЬ СРОЧНО, ПОМОГИТЕ, УМОЛЯЮ
Дан одномерный целочисленный массив Z[3..17], заданный случайными числами на промежутке (-25; 25). Найдите среднее арифметическое элементов массива.
ПАСКАЛЬ!!!!​

Ответы

Ответ дал: huston81
1

Ответ:

pascal

Объяснение:

var i, s: integer;

   z: array [3..17] of integer;

begin

 randomize;

 for i := 3 to 17 do

 begin

   z[i] := random(51) - 25;

   write(z[i], ' ');

   s := s + z[i];

 end;

 writeln;

 writeln('Среднее арифметическое элементов = ', s / 15:1:2);

end.


gufufhgjvjghg: Спасибо огромное!!!!
Похожие вопросы