Найти сумму элементов массива состоящего из n чисел - вопрос №9766588 от bisenov04 20.07.2022 17:08

Question

Информатика: Найти сумму элементов массива состоящего из n чисел и найти их среднее арифметическое на языке паскаль

bisenov04 · Answer

program task31152710; const  N = 10; var  arr: array[1..N] of integer;  S: real; begin  for var i := 1 to N do    begin      Readln(arr[i]);      S := S + arr[i]    end;  Writeln( СУММА ЭЛЕМЕНТОВ = , S);  Writeln( СРЕДНЕЕ АРИФМ. = , S / N); end....