Новые сообщения · Правила  
Страница 1 из 11
Модератор форума: Berestovskiy 
Форум ПРОГРАММИСТОВ » ПРОГРАММИРОВАНИЕ » Паскаль » помогите с задачкой (функция)
помогите с задачкой
Дана целочисленная квадратная матрица.Найти количество строк, среднее арифметическое элементов которых меньше заданной величины(с=7).(написать через функцию)

sLip
1 | Автор: AvoqzT | 2012-06-04, 20:48   |  Репутация: [ + 0 ]
Размерность матрицы какая?

Нужна помощь? Сюда: vkontakte.ru/berestovskiy
2 | Автор: Berestovskiy | 2012-06-06, 15:53   |  Репутация: [ + 211 ]
n=4

sLip
3 | Автор: AvoqzT | 2012-09-23, 12:06   |  Репутация: [ + 0 ]
var
i,j,sredn,n,sch,c:integer;
a:array[1..100]of integer;
begin
c:=7;
read(n);
for i:=1 to n do
for j:=1 to n do
read(a[i,j]);
for i:=1 to n do begin
for j:=1 to n do
sredn:=sredn+a[i,j];
sredn:=sredn/n;
if sredn<c then sch:=sch+1;
sredn:=0;end;
writeln(sch);
end.


Нужна помощь? Сюда: vkontakte.ru/berestovskiy
4 | Автор: Berestovskiy | 2012-09-23, 13:21   |  Репутация: [ + 211 ]
Berestovskiy, видимо уточнение в скобках, что надо сделать через функцию было написано по ошибке xD
5 | Автор: HWOARANG | 2012-09-23, 18:09   |  Репутация: [ + 20 ]
:D
Та я провтыкал))


Нужна помощь? Сюда: vkontakte.ru/berestovskiy
6 | Автор: Berestovskiy | 2012-09-24, 14:00   |  Репутация: [ + 211 ]


Нужна помощь? Сюда: vkontakte.ru/berestovskiy
6 | Автор: Berestovskiy | 2012-09-24, 14:00   |  Репутация: [ + 211 ]
Форум ПРОГРАММИСТОВ » ПРОГРАММИРОВАНИЕ » Паскаль » помогите с задачкой (функция)
Страница 1 из 11
Поиск: