В кейсе лежит 256 разноцветных фломастеров. Сколько информации несет сообщение о том, что из кейса достали зеленый фломастер? Показать полное решение задания.
Язык Паскаль.

def print_num_sys(num, radix):

if (radix == 2):

print("Число {0:d} в двоичной системе счисления равно: {0:#b}".format(num))

elif (radix == 8):

print("Число {0:d} в двоичной системе счисления равно: {0:#o}".format(num))

elif (radix == 10):

print("Число {0:d} в двоичной системе счисления равно: {0:d}".format(num))

elif (radix == 16):

print("Число {0:d} в двоичной системе счисления равно: {0:#x}".format(num))

else:

print("Оcнование системы счисления задано не верно")

x = int(input("Введите целое число: "))

print_num_sys(x, 2)

print_num_sys(x, 8)

print_num_sys(x, 10)

print_num_sys(x, 16)

print_num_sys(x, 11)

Возможный вариант в C++
#include <iostream>
int main()
{
    using namespace std;
    int N;
    cout << "Enter N: ";
    cin >> N;
    int num;
    int max = 1;
    int i;
    for (i = 0; i < N; ++i)
    {
        cout << "Enter #" << i + 1 << " number: ";
        cin >> num;
        if ((num - 9) % 10 != 0 && num % 3 == 0)
        {
            max = num;
            break;
        }
    }
    for (int j = i + 1; j < N; ++j)
    {
        cout << "Enter #" << j + 1 << " number: ";
        cin >> num;
        if ((num - 9) % 10 != 0 && num % 3 == 0)
            if (num > max)
                max = num;
    }
    if (max != 1)
        cout << "Max number div by 3 and don't end 9: " << max << endl;
    else
        cout << "No numbers div by 3 and don't end 9" << endl;
    return 0;
}