Первое слово флаг. палец указывает первую букву заменить на П, значит плаг. Следующая буква И, значит плаги. Затем идёт перевернутый танк, т.е. кнат. две запятые перед ним призывают выкинуть две первые буквы. остается ат. соединим вместе: плагиат. это решение ребуса.
л ) наливаем 3 литра в кувшин.
2) переливаем 3 л в кувшин 5 л.
3) снова наливаем 3 л в кувшин.
4) переливаем 2 л из кувшин 3 л в кувшин 5 л. В кувшине 3 л остался 1 л.
5) из кувшина 5 л переливаем 5 л в кувшин 8 л. Там стало 7 л.
6) переливаем 1 л из кувшина 3 л в кувшин 5 л.
7) из кувшина 8 л наливаем 3 л.
В кувшине 8 л осталось 4 л, в кувшине 3 л стало 3 л, в кувшине 5 л стал 1 л.
8) Из кувшина 3 л выливаем 3 л в кувшин 5 л.
В кувшине 8 л осталось 4 л, в кувшине 5 л тоже стало 4 л.
Всё!
Можно сделать, например, так (но это всё равно очень-очень корявый вариант):
const s='ABCDEF';
var x:string;
t:real;
a,i,n,q:integer;
begin
readln(x);
readln(q);
t:=0;
n:=length(x);
for i:=1 to n do
begin
case x[i] of
'0'..'9' : a:=strtoint(x[i]);
'A'..'F' : a:=pos(x[i],s)+9;
end;
n:=n-1;
t:=t+a*power(q,n);
end;
writeln(t);
end.
Var
A,r1,r2,r3,r4:integer;
Begin
For A:= 1000 to 9999 do
Begin
r1:=A div 1000;
r2:=(A div 100) mod 10;
r3:=(A div 10) mod 10;
r4:=A mod 10;
if (r1<>r2)and(r1<>r3)and(r1<>r4)and(r2<>r3)and(r2<>r4)and(r3<>r4) then
Write(A,' ')
End;
End.
I=1, X=10, C=100, M=1000 и их половины V=5, L=50, D=500
<span>MCXLVII=1147</span>
