найти среднее арифметическое всех средних чисел от а до в 
решение в паскале пожалуйста 

Есть ответ
18.12.2022
184

Ответ


Var n,s,k,i : integer;Beginwriteln ('Введите кол-во чисел');readln (n);for i:=1 to n dobeginwriteln ('Введите ',i,' число');readln (k);s:=s+k;end;writeln ('Среднее арифметическое =',s/n:5:2);End.


Если вы нашли правильное решение, вы можете поблагодарить нас начиная с 10 рублей.
Просто нажмите на кнопку "Подарить".
18.12.2022
Этот сайт использует cookies (Политика Cookies). Вы можете указать условия хранения и доступ к cookies в своем браузере.