Program p1;
Uses crt;
Var A: array [1..10] of integer;
i,k: integer;
Begin clrscr;
Writeln ('Введите элементы массива');
for i:=1 to 10 do
read (a[i]);
k:=0;
for i:=1 to 10 do
begin
if (a[i]>10) and (a[i]<30) then
k:=k+1;
end;
writeln ('Количество чисел в диапазоне (10;30) =',k);
Readln;
readkey;
end.
n - кол-во элементов в массиве, a[] - сам массив.
Алгоритм работает в тупую за O(n²)
Вот весь алгоритм:
for (int i = 0; i < n; i++) {
for (int j = i - 1; j >= 0; j--) {
int flag = 1;
if (a[j] == a[i]) {
flag = 0;
break
}
if (flag)
a[i] = 0;
1)Если он этого не знал.
2)Если он все понял.(может быть такое, что сообщение написано на языке которое он не знает.)
3)Если он его прочитал и осмыслил.(может же просто пробежаться глазами
√13= 3.60555128
√14 = 3.74165739
√13.14= 3.62491379