Найти отношение суммы положительных элементов матрици к сумме отрицательных элементов

@Artemis-metal · Регистрация: 17.01.2011

Author24 — интернет-сервис помощи студентам

Дана матрица А размером (n*m)
Найти отношение суммы положительных элементов матрици к сумме отрицательных элементов. Помогите пожалуйта, очень срочно!

@neske · 18.01.2011, 15:47

И в чем проблема, загвоздка?
Есть наработки?

@Artemis-metal · 18.01.2011, 15:52 **[ТС]**

Пока нет, в процессе

@sv_dell_sv · 18.01.2011, 15:58

Pascal

program z1;
uses crt;
var a:array [1..100,1..100] of integer;
i,j,n,m,s,s1:integer;
s2:real;
begin
writeln('Введите n');
readln(n);
writeln('Введите m');
readln(m);
for i:=1 to n do begin
for j:=1 to m do begin
Write('A[',i,',',j,']=');
readln(a[i,j]);
end;
end;
for i:=1 to n do begin
For j:=1 to m do
if a[i,j]>0 then
s:=s+a[i,j];
end;
for i:=1 to n do begin
For j:=1 to m do
if a[i,j]<0 then
s1:=s1+a[i,j];
end;
s2:=s/s1;
writeln('Ответ - ',s2);
readln;
end.

@Artemis-metal 0 / 0 / 0 Регистрация: 17.01.2011 Сообщений: 11
		1
	Найти отношение суммы положительных элементов матрици к сумме отрицательных элементов 18.01.2011, 15:10. Показов 801. Ответов 3 Метки нет (Все метки) Дана матрица А размером (n*m) Найти отношение суммы положительных элементов матрици к сумме отрицательных элементов. Помогите пожалуйта, очень срочно! 0

@neske 1552 / 918 / 193 Регистрация: 26.03.2010 Сообщений: 3,105
	18.01.2011, 15:47	2
	И в чем проблема, загвоздка? Есть наработки? 0

@Artemis-metal 0 / 0 / 0 Регистрация: 17.01.2011 Сообщений: 11
	18.01.2011, 15:52 [ТС]	3
	Пока нет, в процессе 0

	18.01.2011, 15:58

Опции темы