38 в десятичной , но такого ответа нет, значит надо перевести 37 в двоичную систему. для этого 38 делим на 2 пока делится
38/2=19 остаток0
19/2=9 остаток 1, уже видно что двоичный второй ответ не подходит, там нет нуля.
попробуем переведем в восьмеричную, для этого делим 38 на 8.
38/8=4 остаток 6, получается 46 в 8 сс. ответ 4
Ответ дал: Гость
var s : string; k,f : longint; begin readln(s); val(s[1],k,f); if f< > 0 then writeln('некоректно введена строка') else if length(s)-1=k then writeln('равно') else writeln('неравно'); end.
Популярные вопросы