Чертежник составьте алгоритм букв Р и Д

австрия - вена

бельгия- брюссель

великобритания-лондон

германия-берлин

ирландия-дублин

я думаю что основанием будет число 7 

проверка: 7^2*1+7^1*2+7^0*2= 49+14+2=65

пщояк 17 27 16 33 17

нщёп 15 27 7 17

varn: integer; beginreadln(n); n: = n div 10; n: =(n div 100)*10 +n mod 10; writeln(n); n: = (n mod 10)*100+ ((n mod 100) div 10)*10+ n div 100; writeln(n); end.