алгоритм. среди пяти чисел найти среднее арифметическое
Сред. Арифметическое = Сумма всех чисел разделить на количество
(A1 + A2 + A3 + A4 + A5) / 5
program rrr;uses crt;const n=9;type massiv=array[1..n]of real;var a:massiv;max,sr:integer;procedure vvod(var x:massiv);var i:integer;beginwriteln('wwedite massiv');for i:=1 to n doreadln(x[i]);end;procedure vivod(x:massiv);var i:integer;beginfor i:=1 to n dowrite(x[i]:6:2,' ');end;procedure sred_ar_i_max(x:massiv,var sr,max:real);var sum:real; i:integer;begins:=0;for i:=1 to n doif x[i]>0 then s:=s+x[i];end;sr:=s/n;for i:=1 to n doif (x[i]>0) and max<x[i] then max:=x[i];end;vvod(a);clrscr;vivod(a);sred_ar_i_max(a,sr,max);writeln('max=',max:6:2,'srednee arifmet=',sr:6:2);readln;end.
В какой оболочке земли живёт большинство живых организмов?
Из каких неживых частей состоит экосистема
На какие расы делятся население земли
Определение статуса военнослужащего (краткий ответ!!)
Проведи следущие наблюдения в классе: один учащийся спокойно сидит за партой, слушая объяснения учителя; второй записывает план объяснения в тетради ; третий ученик вышел к доске отвечать на вопрос учителя. назови движущиеся тела. относительно каких других тел они движутся ?
Посетители, находящиеся в группе Гости, не могут оставлять комментарии к данной публикации.