Все квадраты натуральных чисел записаны подряд, начиная с единицы. определить, какая цифра стоит на n-м месте. пример ввода: 4 вывода: 1
210
392
Ответы на вопрос:
Немного теории. для того, чтобы избежать переполнения разрядной сетки, значение квадрата натурального числа не должно превышать максимального числа, представимого выбранным типом данных. в языке паскаль числа типа longint записываются в четырех байтах в дополнительном коде, т.е. максимальное значение числа не может превышать 2³¹-1. тогда максимальное натуральное число, квадрат которого мы можем вычислить, равно целой части от величины: //pascalabc.net 3.0, сборка 1066 var s: string; i,n,lim,l: longint; begin lim: =trunc(exp(15.5*ln(; write('введите номер позиции: '); read(n); i: =0; l: =0; while (l< n) and (i< =lim) do begin inc(i); str(i*i,s); l: =l+length(s); end; if i< =lim then writeln('искомая цифра- ',s[length(s)-l+n]) else writeln('решения в типе данных longint невозможно') end. тестовое решение: введите номер позиции: 4 искомая цифра- 1 введите номер позиции: 33 искомая цифра- 5
//pascalabc.net 3.2 begin var a: =arrrandom (readinteger('n ='), -15, 15); a.println; var b: array of integer; for var i: =0 to length(a)-1 do if not((a[i]< 0) or ((a[i] mod 8)=0)) then begin setlength (b, length(b)+1); b[length(b)-1]: =a[i] end; b.print; end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
AvdAda2429.03.2022 03:28
-
romalebedev1911.04.2022 13:12
-
mila33628.03.2022 05:34
-
magistr781830.09.2022 17:11
-
paniann1717.11.2022 03:45
-
Торт12306.05.2022 17:55
-
Neznau2717.02.2022 21:07
-
fokslov6905.04.2023 17:47
-
ivanovaanastasi104.10.2021 13:51
-
kristinavlasovа27.06.2022 00:51
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.