2 бита информации, то есть объем алфавита
То есть объем алфавита 4 символа. Пример числа в 4 системе счисления. ТО есть
<em><u>P.S. Надеюсь на благодарность и лучший ответ.</u></em>
===== PascalABC.NET =====
-1-
begin
var x := ReadReal('Введите вклад?');
var n := ReadInteger('Введите срок?');
for var i := 1 to n do
begin
x *= 1.03;
Writeln(i, ' год - ', x:0:2, ' руб')
end
end.
-2-
begin
for var i := 1 to 10 do
Writeln('5*', i, ' = ', 5 * i)
end.
-3-
begin
var s := ReadSeqReal('Введите 5 любых чисел:', 5).Sum;
Println('Их сумма равна', s);
end.
#include <iostream>
#include <string>
using namespace std;
const unsigned space = 65;
int main()
{
unsigned n = 0;
cin >> n;
for (unsigned i = space; i < space + n; ++i) {
string str(i - (space - 1), (char)i);
cout << str << endl;
}
return 0;
}
Пн.A,B,C,D
вт.D,C,B,B,A
ср.A,A,A,C,B,D
чт.D,D,D,B,C,A
пт.A,B,A,A,D
A=9
B=6
C=4
D=7