Python:Даны три целых числа. Выведите значение среднего (число между большим и меньшим)

arseniyrom20p08lxy arseniyrom20p08lxy    3   25.04.2020 12:19    0

Ответы
solomiaoleksin solomiaoleksin  13.10.2020 20:55

const N = 3;

# если что можно хоть 5, хоть 69, хоть 420

type

   arrtype = array[1..N] of integer;

var

   arr: arrtype;

   i: byte;

   avrg: real;

procedure fill_array(var a: arrtype);

begin

   for i:=1 to N do a[i]:=random(50)+1;

end;

function average(a:arrtype):real;

var sum:integer;

begin

   sum := 0;

   for i:=1 to N do sum:=sum+a[i];

   average := sum / n;

end;

begin

   randomize;

   fill_array(arr);

   for i:=1 to N do write(arr[i]:4);

   writeln;

   avrg := average(arr);

   writeln(avrg:3:2);

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика