Program MinMax var a: array [1..100] of real var i, nmin, nmax: integer, min, max: real BEGIN for i := 1 to 100 do read a[i]; // вводим массив min := a[1]; max := a[1]; nmin := 0; nmax := 0; for i := 1 to 100 do begin if a[i] = min then nmin := nmin + 1; if a[i] = max then nmax := nmax + 1; if a[i] < min then begin min = a[i]; nmin := 1; end if a[i] > max then begin max = a[i]; nmax := 1; end end; if nmin > nmax then write ('Min') if nmin < nmax then write ('Max') if nmin = nmax then write ('Ravno') END.
for(int i=0;i<arrray.length;i++)
arrray
Во-вторых рабочая прога:
public class ZnanijaCom{
public static void main(String[] main) {
int array[] = {1,1,3,4,5,6,7,7,6};
int number;
for(int i=0;i<array.length;i++) {
for(int j=i+1;j<array.length;j++) {
if (array[i] == array[j]) {
System.out.println("Najden povtor chisla " + array[i]); System.out.println(" pervyj indeks " + i);
System.out.println(" vtoroj indeks " + j);
}
}
}
}
}