<u>// PascalABC.NET 3.2, сборка 1353 от 27.11.2016</u>
<u>// Внимание! Если программа не работает, обновите версию!</u>
begin
var a:=ReadArrInteger('Вводите:',ReadInteger('n='));
Writeln('Различных элементов- ',a.Distinct.Count)
end.
<em>Пример</em>
n= 10
Вводите: 456 12 6432654 -35424 -323421341 0 6432654 634222 -234532 34
Различных элементов- 9
<h2>поиск одинаковых строк в матрице</h2><h2>(c++)</h2>
#include <iostream>
#include <ctime>
#include <iomanip>
#include <vector>
using namespace std;
typedef vector< vector<int> > T;
ostream &operator<<(ostream &output,const T &mass)
{
for(size_t i = 0;i<mass.size();++i){
for(size_t j = 0;j<mass.size();++j)
output<<setw(5)<<mass[j];
output<<"\n\n";
}
return output;
}
int _tmain(int argc, _TCHAR* argv[])
{
srand((unsigned)time(0));
unsigned int row,col;
do{
cout<<"Enter rows > 0"<<endl;
cin>>row;
}while(row <= 0);
do{
cout<<"Enter col > 0"<<endl;
cin>>col;
}while(col <= 0);
T mass(row, vector<int>(col));
for(size_t i = 0;i < row;++i){
for(size_t j = 0;j < col;++j)
mass[j] = rand()%10;
}
cout<<mass;
return 0;
}
Око , пуп , тот , оно , антилопа , <span> азбука , алгебра , антэна , снилс.</span>
В записи по некоторому основанию n число шестиразрядное, поскольку оно содержит три единицы и три нуля, всего шесть цифр. При этом, самой левой (старшей) цифрой является единица. Переходим к расширенной записи, обозначая неизвестную цифру в разряде через d:
1×n⁵+d₄×n⁴+d₃×n³+d₂×n²+d₁×n¹+d₀=1104
n⁵+Δ=1104, где Δ - некоторый "довесок", равный d₄×n⁴+d₃×n³+d₂×n²+d₁×n¹+d₀
В то же время, 1104<n⁶, поскольку в противном случае число было бы семиразрядным.
n⁵≤1104<n⁶
Приближенно извлекая из 1104 корни пятой и шестой степени получаем:
3.21≤1104<4.06 и в целых числах находим, что n=4.
Переведем 1104 в систему счисления по основанию 4:
1104 / 4 = 276, остаток 0
276 / 4 = 69, остаток 0
69 / 4 = 17, остаток 1
17 / 4 = 4, остаток 1
4 / 4 = 1, остаток 0
1 / 4 = 0, остаток 1
Теперь выпишем остатки в обратном порядке, получая 101100
<em>1104₁₀ = 101100₄,</em> т.е. проверка показала, что число в самом деле содержит три единицы и три нуля.
<u><em>Ответ: 4</em></u>