Дана квадратная матрица. Получить одномерный массив состоящий из средних арифметических элементов строк матрицы. Полученный одномерный массив
5-9 класс
|
отсортировать в порядке возрастания элементов. Вывести:
- матрицу
- одномерный массив до сортировки
- одномерный массив после сортировки прошу. срочно!
Язык Python
import pprint
A = [[1,2,3,4],[9,8,7,6],[3,4,5,6],[3,8,2,7]]
print "Матрица"
pprint.pprint(A)
tmp = map(lambda x: float(sum(x))/len(x), A)
print "\nМассив"
print tmp
print 'Отсортированный массив'
print sorted(tmp)
Другие вопросы из категории
2. Что такое растр? Что такое пиксел?
3. Как вы понимаете слова "изображение выполнено с разрешением 640x480"?
4. Что такое графический примитив?
5. В чем состоят особенности векторной графики?
6. Какие вы знаете объекты растровой графики?
7. Перечислите основные действия над объектами растрового графического редактора.
Заранее спасибо
на диске Е. ПОМОГИТЕ ПОЖАЛУЙСТА!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
Читайте также
Найти сумму элементов данного массива.
2. Заполнить одномерный массив, состоящий из 10 элементов, случайными числами от-15 до 35.
Найти значение максимального элемента массива.
от -100 до 100. Определить минимальное положительное число.
2) Дан массив, состоящий из 10 чисел. Найдите номера тех элементовв масива, которые наименее различаются.
Заранее благодарю
Условие: Дан одномерный массив, состоящий из вещественных элементов. Найти произведение элементов массива, расположенных между максимальным по модулю и минимальным по модулю элементами.
Не совсем то выводит, и модуль может как-то через abs надо.
program proizvedenie;
var q,z,w,i,n,i1,i2:integer;
a:array[1..1000] of real;
amin,amax,pr:real;
begin
assign (input,'input.txt');
assign (output,'output.txt');
reset (input);
rewrite (output);
readln(n);
for i:=1 to n do read (a[i]);
amin:=a[1];
for i:=1 to n do
begin
if a[i]<amin then
begin
amin:=a[i];
i1:=i;
end;
end;
amax:=a[1];
for i:=1 to n do
begin
if a[i] > amax then
amax:=a[i];
i2:=i;
end;
if i2>i1 then begin
q:=i1;
w:=i2;
end
else begin
q:=i2;
w:=i1;
end;
if (w-q)>1 then begin
pr:=1;
for z:=q to w do
pr:=pr*a[z];
end
else write (0);
close (input);
close (output);
end.