Написать код решения в паскале. кощей бессмертный зарыл клад на глубину 1 м. этого ему показалось не достаточно, он отрыл клад, углубил колодец до 2 м и снова зарыл. этого ему опять показалось мало, он отрыл клад, углубил колодец до 3 м и зарыл. затем он проделал тоже, углубив колодец до 4 м, потом до 5 м, 6 м и т.д. известно, что колодец глубиной n метров кощей вырывает за n2 дней. известно также, что на 1001-й день кощей умер от непосильной работы. на какой глубине остался клад? (временем, необходимым для закапывания клада, пренебречь). дана формула: 1^2+2^2+3^2++n^2 < =1001
104
398
Ответы на вопрос:
F: =1; g: =0; while g< =1001 do begin g: = +g; f: =f+1; end; f- искомое поставь лучшее решение !
Var n : int64; function ispali(a : int64) : boolean; var b : int64; begin b: =1; while b< a do b: =b*10; b: =b div 10; if a> 9 then ispali: =((a div b)=(a mod 10)) and ispali(a mod b div 10) else ispali: =true; end; begin readln(n); if ispali(n) then writeln('это полиндром.') else writeln('это не полиндром.'); write('его квадрат ',sqr(n)); if ispali(sqr(n)) then writeln(' полиндром.') else writeln(' не полиндром.'); end. хотя в pabc.net есть функция и покороче: function ispali(b : longint) : boolean; begin ispali: =(b=intrevers(b)); end;
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
btslove226.10.2021 22:00
-
Kirill2006133714.02.2020 09:09
-
МасенькаЗайка27.04.2023 03:42
-
kdgsteam21.01.2020 11:52
-
Vlad44kostroma426.01.2020 12:19
-
Dmitrrrr30.03.2022 20:42
-
Artemvmmv13.07.2022 19:45
-
SEreNAaaAA16.08.2021 14:27
-
Nika133722808.05.2020 11:30
-
Chalmers199817.10.2022 14:27
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.