Справочник функций

Ваш аккаунт

Войти через: 
Забыли пароль?
Регистрация
Информацию о новых материалах можно получать и без регистрации:

Почтовая рассылка

Подписчиков: -1
Последний выпуск: 19.06.2015

Дана целочисленная матрица A(nxn).Найдите наибольшие элементы в каждом столбце этой матрице и найти количество нечётных чисел среди них

87K
18 декабря 2012 года
J3dY
1 / / 18.12.2012
Помогите!
247
19 декабря 2012 года
wanja
1.2K / / 03.02.2003
 
Код:
nodd:=0;
for i:=1 to n do
  begin
  maxs:=a[1,i];
  for j:=2 to n do
      if a[j,i]>maxs then
          maxs:=a[j,i];
  if odd(maxs) then inc(nodd);
  end;
Примерно так...
87K
24 декабря 2012 года
vladislav998
3 / / 24.12.2012
1.min= 1e38
2.FOR i=1 TO n
3.FOR j=1 TO n
4.IF i<j AND a(i,j)>0 AND a(i,j)<min THEN min=a(i,j)
5.IF i=j AND a(i,j)<0 THEN k=k+1
6.NEXT
7.NEXT
8.PRINT"kol-vo otricat.=";k
9.PRINT"min=";min
87K
24 декабря 2012 года
vladislav998
3 / / 24.12.2012
min= 1e38
FOR i=1 TO n
FOR j=1 TO n
IF i<j AND a(i,j)>0 AND a(i,j)<min THEN min=a(i,j)
IF i=j AND a(i,j)<0 THEN k=k+1
NEXT
NEXT
PRINT"kol-vo otricat.=";k
PRINT"min=";min
Реклама на сайте | Обмен ссылками | Ссылки | Экспорт (RSS) | Контакты
Добавить статью | Добавить исходник | Добавить хостинг-провайдера | Добавить сайт в каталог