Дан одномерный массив из 10 элементов определите среднее значение стоящих между минимальным и макимальным
Дан одномерный массив из 10 элементов определите среднее значение стоящих между минимальным и макимальным
Гость
Ответ(ы) на вопрос:
Гостьprogram massiv;
var i,n,max,sr,min,pozm,pozx:longint;
a:array[1..10]of longint;
begin
for i:=1 to 10 do
read(a[i]);
for i:=1 to 10 do
begin
if a[i]>max then begin max:=a[i]; pozm:=i; end;
if a[i]
Не нашли ответ?
Похожие вопросы