Вам дана строка s.надо определить, сколько в ней цифр формат входных данных единственная строка входного файла содержит строку s, которая может состоять из букв алфавита и цифр. гарантируется, что строка не пустая и ее длина не превосходит 100 формат выходных данных выведите ответ к
142
439
Ответы на вопрос:
Var s: string; k, i: integer; begin read(s); for i : = 1 to length(s) do if (s[i] in ['0'..'9']) then k : = k + 1; writeln(k); end.
Program task; var s: string; i, nums: integer; begin writeln('введите строку'); readln(s); if length(s) > 100 then writeln('ошибка. завершение работы программы'); for i : = 1 to length(s) do if (ord(s[i]) > = 48) and (ord(s[i]) < = 57) then nums : = nums + 1; writeln('количество цифр в строке: ', nums); readln; end.
Var a,b,c: integer; begin b: =1; c: =1; write('введите число: '); readln(a); while (b< =a) do begin c: =c+1; b: =b*c; end; writeln('ответ: ',c); end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
danjaegorovru06.08.2021 01:22
-
MoDnIk23727.11.2021 14:10
-
1234554321я20.12.2020 22:01
-
podgainiyroma25.09.2022 20:54
-
Apple6pen17.02.2023 01:40
-
nata321220.07.2021 10:52
-
buli4ka20.02.2020 17:41
-
AlexNickrodef26.11.2021 07:58
-
Akmeyir25.02.2023 12:16
-
PetrovnaSasha05.03.2020 05:36
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.