Elektrotehnicki fakultet, Beograd  ����� ����� ���������� ������ (��)
�����
14. 9. 2001.

����� �� ���� ���������� �� ������ ������� ����� �� ���� ��������� �� ��������, �� �������� � ������ �������� ���������� � �� ���������� �������� ���������� ��������.

������: ����� �������� (������� 1) � ����� ����� (������� 2 �� ������)

������: 1 2 | �������� | �����: 2

�������� ������� 1 (45 �����) ( �������)

�������� ������� �� FORTRAN-� �� ������� ���� ������� ������ ����� �� ������� ��������� ���� n.

������� ������: n = 100

�������� �� �������� ������� �������, ������� ��������, �������� ������ ��������, ��� � �������, ����������� ��� � ����� ���������.

�������� ������� 2 (35 �����) ( ����� | �������)

��������� ���������� �� ������ C �� ��������� ���� �� ������ ��������� ��������� ���� �� ���� �� ������� ������ ������ ����������� �������.

��������� ������ ������� �� ������ C ��� ������� ������� ������� ������, ���� ���� ������ ��������� ��������� ���� �� ���� �� ������� �� �������, ������ ������� �������� � ������ ��������� ������ ��� ��� �� ����� �� �������� ������� �� ������� ���������� ��������.


�������� ( �������)


����� ������� 2 ( �������� | �������)

#include <stdio.h>

#define MAX 50

void srednje (float a[][MAX], int m, int n, float b[]) {
  int i, j, k; float s;
  for (i=0; i<m; i++) {
    for (s=k=j=0; j<n; j++)
      if (a[i][j] > 0) { s += a[i][j]; k++; }
    b[i] = k ? s/k : 0;
  }
}

void main () {
  float a[MAX][MAX], b[MAX], s; int m, n, i, j;
  while (1) {
    printf ("m, n? "); scanf ("%d%d", &m, &n);
  if (m<0 || m>MAX || n<0 || n>MAX) break;
    for (i=0; i<m; i++) {
      printf ("A[%d][]? ", i);
      for (j=0; j<n; scanf("%f", &a[i][j++]));
    }
    srednje (a, m, n, b);
    for (s=i=0; i<m; s+=b[i++]);
    printf ("s= %.2f\n", s);
  }
}
( �������)
         
�����: ����� �����
�-�����: kraus@etf.rs

Copyright © 2001, Laslo Kraus
������� �������: 1.11.2001.