Question

Заполнить массив двумя случайными числами из диапазона от 0 до 11, вывести на экран эти числа и из среднее арифметическое. Паскаль!!!!!​

Answer 1

Ответ:

const n=5;

var

a: array [1..n] of integer;

i: integer;

k: real;

begin

 k:=0;

 randomize;

 for i:= 1 to n do

     a[i]:= random (11);

 for i:= 1 to n do

     write (a[i]:3);

 writeln;

 for i:= 1 to n do

    k:=a[i]+k;

  k:=k/n;

 write ('среднее арифметическое: ',k );  

 end.

Объяснение:

 1  7  3  6  6

среднее арифметическое: 4.6