Вот задача: Фокусник даёт угадать вам, в какой шляпе находится кролик. Какое количество информации он вам передаст, если у него на столе лежат 16 шляп и номера шляп кодируются битами? ответ необходимо дать в битах.
Sub Zadanie16084380() ' Дана матрица Y(5,5) (элементы матрицы выбрать самостоятельно). Вы- ' числить элементы новой матрицы Z(5,5) по правилу: zij = yij / ki, где ki – количе- ' ство положительных элементов i-той строки. ' Если в i-той строке положительных элементов нет, то i-тая строка в матрице ' Z должна быть заполнена нулями Const N = 4 Dim Y,Z,K ReDim Y(N, N), Z(N, N), K(N) S=""
Randomize For i = 0 To N K(i) = 0 For j = 0 To N Y(i, j) = Int(100 * Rnd) - 50 S = S & Y(i, j) & " " If Y(i, j) > 0 Then K(i) = K(i) + 1 End If Next S = S & vbNewLine Next S = S & vbNewLine
For i = 0 To N For j = 0 To N if K(i) = 0 then Z(i, j) = 0 else Z(i, j) = Y(i, j) / K(i) end if S = S & Z(i, j) & " " Next S = S & vbNewLine Next MsgBox (s) End Sub
#include <iostream>
#include <list>
#include <cstdlib>
#include <ctime>
#include <iomanip>
using namespace std;
int main() {
int j,n;
list<int> lst;
list<int>::iterator it1;
// начальная установка генератора случ. чисел
srand(time(NULL));
//заполнение списка
cout<<"n = "; cin>>n;
for (j=0; j<n; j++)
lst.push_back(rand() % 10);
//вывод на экран
cout<<"initial array: ";
for (it1=lst.begin(); it1!=lst.end(); it1++)
cout<<*it1<<" ";
//сортировка, удаление повторных
lst.sort();
lst.unique();
//вывод списка
cout<<endl<<"after removing: ";
for (it1=lst.begin(); it1!=lst.end(); it1++)
cout<<*it1<<" ";
cout<<endl;
system("pause");
return 0;
}
В варианте без сортировки (что, вообще говоря, не принципиально) убираете строку lst.sort();