Нужно решить на мове pascalabc вычислить количество цифр целого неотрицательного числа n. входные данные #1 12343 выходные данные #1 5
108
203
Ответы на вопрос:
Var n,k: integer; begin write('n ='); read(n); n: =abs(n); { от злобных буратинок с отрицательными числами } if k=n then k: =1 else begin k: =0; while n> 0 do begin k: =k+1; n: =n div 10 end end; writeln('количество цифр в числе равно ',k) end. пример n =435342134 количество цифр в числе равно 9
Program example; var a, b, c: integer; function gero(a,b,c: integer): double; var p: double; begin p: =(a+b+c)/2; gero: =p*(p-a)*(p-b)*(p-c); end; begin write('введите a'); readln(a); write('введите b '); readln(b); write('введите c'); readln(c); writeln(gero(a,b,c)); readkey; end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
LEH915.03.2022 11:09
-
ArinaBelman1822.02.2023 23:51
-
PoL81122.01.2023 21:33
-
00lom0003.05.2022 21:41
-
danilfkr10.06.2020 01:55
-
ablozhevich18.08.2020 05:48
-
tinahovsepyan28.12.2021 04:27
-
БАХАУДДИН26.12.2021 04:46
-
zhenyakulakova21.03.2022 21:58
-
ilin265ilinMiha03.03.2021 17:18
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.