Составьте линейную программу нахождения среднего - вопрос №12833614 от kudinovakarina27 08.05.2021 02:37

Question

Информатика: Составьте линейную программу нахождения среднего арифметического четырёх случайных неотрицательных чисел, если известно, что числа не +превышают 50. На экран вывести числа и среднее арифметическое в одну строку. Числа не должны быть написаны слитно. Среднее арифметическое должно быть написано в формате до двух знаков после запятой

kudinovakarina27 · Answer

pascalОбъяснение:const  n = 4;var  a: array of integer;  i: integer;  s: real;begin  SetLength(a, n);  for i := 0 to n - 1 do  begin    a[i] := round(random(51));    s := s + a[i];    Write(a[i], );  end;  WriteLn(s/n:2:2);end....