Дан массив а 5. Случайные числа от 0 до 30. Найти сумму и среднее арифметическое всех чисел.

Question

Информатика

Масята

24 мая, 02:03

Дан массив а 5. Случайные числа от 0 до 30. Найти сумму и среднее арифметическое всех чисел.

+2

Ответы (1)

Знаете ответ?

Ишута · Answer 1

Program z1;

var a:array [1 ... 5] of integer;

s, k, n : integer;

begin

for I:=1 to 5 do begin

readln (a[I]) ;

s:=s+a[I];

k:=k+1;

end;

n:=s/k;

writeln (s, k) ;

end.

надеюсь помог