Array47. Дан целочисленный массив размера N. Найти количество различных элементов в данном массиве.
>Решение Pascal
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 | program Array47; var a:array[1..10] of integer; N,i,i2,Num:Integer; check: Boolean; begin Write('N: '); Readln(N); for i:=1 to N do begin write(i,' :'); readln(a[i]); end; Num:=0; for i:=1 to N do begin check:=true; for i2:=i+1 to N do if a[i]=a[i2] then check:=False; if check then inc(Num); end; Writeln(Num); end. |
>
Решение C
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 | #include <stdio.h> int main(void) { int a[10]; int n; printf("N: "); scanf("%i",&n); int i; for (i=0; i<n; ++i){ printf("a[%i] : ",i+1); scanf("%i",&a[i]); } int i2,num=1; for (i=1; i<n;++i,++num){ for (i2=i-1; i2>=0;--i2){ if (a[i]==a[i2]) { --num; break; } } } printf("%i\n",num); return 0; } |
Swift xcode
let array47 = [2, 7, 5, 2, 7, 14, 5, 9, 1, 23, 14]
var k = 0
var s = 1
for i in 0 … array47.count — 2 {
for j in s … array47.count — 1 {
if array47[i] == array47[j] {
k += 1
if k == 1 {
print(array47[i], terminator: «, «)
}
}
}
s += 1
k = 0
}
print(2, 7, 5, 14) <— result
Swift xcode
//2 — usul (2-метод)
let array47 = [2, 7, 5, 2, 7, 14, 5, 9, 1, 23, 14]
var g = 0
var f = 0
for i in 0 … array47.count — 2 {
f = i + 1
while (g < 1) && (f <= array47.count — 1) {
if array47[i] == array47[f] {
g += 1
print(array47[i], terminator: ", ")
}
f += 1
}
g = 0
}
print(2, 7, 5, 14) <— result
🙂
Дан массив размера N. Описать функцию, которая находит самое близкое число к среднегеометрическому значению элементов массива, то есть элемент, который имеет минимальную разность от среднегеометрического значения.????