// PascalABC.NET 3.1, сборка 1246 от 23.05.2016
begin
ReadlnString('>').ToCharArray.Shuffle.Println('')
end.
<u><em>Тестовое решение:</em></u>
> Информатика
фмИатрниаок
Инверсия это вещь отрицание, тебе из условия дано, что каждая буква означает, так вот например, С= Серёжа съел конфету, а в таблицу мы записываем их высказывания, например там сказано мол Серёжа сказал, что не ел конфету, в таблицу запиши С с чертой
var n,s:integer;
x1,x2,x3,x4:integer;
begin
write('Vvedite N = ');
read(n);
x1:=n div 1000;
x2:=n mod 1000 div 100;
x3:=n mod 100 div 10;
x4:=n mod 10 div 1;
s:=x1+x2+x3+x4;
writeln(s);
end.
2 Мартышки = 10 кг
Мартышка = 5 кг
Мартышка + 1 кг = 3 Капуцины
5+1кг = 3 Капуцины
Капуцина = 2 кг
Капуцина+Мартышка = Гиббон
5+2 = Гиббон
Гиббон = 7 кг
Мартышка + 3 Гиббона = Павиан + Капуцина
5кг+3×7=Павиан + 2 кг
26кг=Павиан + 2 кг
24кг= Павиан.
Отсюда:
Мартышка = 5 кг.
Капуцина = 2 кг.
Гиббон = 7 кг.
Павиан = 24 кг.
Дано: N=32 ; K=1024
Решение:
1024*5= 5120 бит=640 байт