#include <iostream> using namespace std; const int n = 15;
double congruential(int &x) // функция генерации псевдослучайных чисел { const int m = 100, // генерация псевдослучайных чисел в диапазоне значений от 0 до 100 (выбирается случайно m > 0) a = 8, // множитель (выбирается случайно 0 <= a <= m) inc = 65; // инкрементирующее значение (выбирается случайно 0 <= inc <= m) x = ((a * x) + inc) % m; // формула линейного конгруэнтного метода генерации псевдослучайных чисел return (x / double(m)); }
int main() { double arr[n]; double num, frq, max_frq; int x0 = 20; for (int i=0; i<n; i++) { arr[i] = congruential(x0); cout << arr[i] << " "; }
num = arr[0]; max_frq = 1; for (int i=0; i < n-1; i++) { frq = 1; for (int k = i+1; k<n; k++) if (arr[i] == arr[k]) frq += 1; if (frq > max_frq) { max_frq = frq; num = arr[i]; } } cout << endl; if (max_frq > 1) cout << max_frq << " : " << num << endl; else cout << "All uniqum" << endl; return 0; }
using namespace std;
const int n = 15;
double congruential(int &x) // функция генерации псевдослучайных чисел
{
const int m = 100, // генерация псевдослучайных чисел в диапазоне
значений от 0 до 100 (выбирается случайно m > 0)
a = 8, // множитель (выбирается случайно 0 <= a <= m)
inc = 65; // инкрементирующее значение (выбирается случайно 0
<= inc <= m)
x = ((a * x) + inc) % m; // формула линейного конгруэнтного метода
генерации псевдослучайных чисел
return (x / double(m));
}
int main()
{
double arr[n];
double num, frq, max_frq;
int x0 = 20;
for (int i=0; i<n; i++) {
arr[i] = congruential(x0);
cout << arr[i] << " ";
}
num = arr[0];
max_frq = 1;
for (int i=0; i < n-1; i++) {
frq = 1;
for (int k = i+1; k<n; k++)
if (arr[i] == arr[k])
frq += 1;
if (frq > max_frq) {
max_frq = frq;
num = arr[i];
}
}
cout << endl;
if (max_frq > 1)
cout << max_frq << " : " << num << endl;
else
cout << "All uniqum" << endl;
return 0;
}
begin
write('x = ');
readln(x);
writeln('Введите номер задачи:');
writeln('1-вычисление квадратного корня;');
writeln('2-возведение в квадрат;');
writeln('3-вычисление синуса;');
writeln('4-вычисление косинуса;');
readln(n);
case n of
1: writeln(sqrt(x):6:4);
2: writeln(x*x:6:4);
3: writeln(sin(x):6:4);
4: writeln(cos(x):6:4);
else writeln('Ошибка ввода');
end;
end.
Пример:
x = 2.1
Введите номер задачи:
1-вычисление квадратного корня;
2-возведение в квадрат;
3-вычисление синуса;
4-вычисление косинуса;
3
0.8632