Пуск-завершение работы или принудительное
<em>// PascalABC.NET 3.3, сборка 1634 от 14.02.2018</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var (x,y):=ReadReal2('Введите координаты точки через пробел:');
Writeln((x>2) and (x*x+y*y<36))
end.
<u>Примеры</u>
Введите координаты точки через пробел: 5 3.5
False
Введите координты точки через пробел: 5 3
True
Имеем 4х буквенный алфавит: а=0, к=1, р=2, у=3
акура=01320=0*4^4+1*4^3+3*4^2+2*4^1+0*4^0=64+3*16+2*4=64+48+8=120
карау=10203=256+2*16+3=256+32+3=291
рукаа=23100=2*256+3*64+32=512+192+32=736
укара=31020=3*256+64+2*4=768+64+8=836
урака=32010=3*256+2*64+4=832
Напиши немного понятней....как я поняла, тебе надо 256 перевести в восьмеричную, то получится 400,
Дальше смогу если понятней напишешь... Прости