в массиве хранятся данные о ежедневной температуре в течении августа (случайные числа от 15 до 25) составиьте программу для нахождения среднемесячной температуры

Pascal:

var

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

   i:integer;

   mean:real = 0;

begin

   for i:=1 to 31 do begin

       a[i]:=random(11)+15;

       write(a[i],' ');

       mean:=mean + a[i]/31;

   end;

   writeln();

   write('Средняя температура августа равна ', mean:0:2);

end.

Python (раз уж написал, пусть будет):

from random import randint

a = [randint(15,26) for i in range(31)]

mean = 0

for i in a:

 mean += i/len(a)

print('Средняя температура равна ' + str(round(mean,2)))