1: набрать и протестировать на компьютере программу, которая подсчитывает количество цифр в исходной строке и печатает все, кроме пробелов, знаков операций и знаков препинания. текст программы: program demoset; uses crt; var s: string; i,k: integer; begin k: =0; clrscr; write('введите произвольную строку => '); readln(s); writeln('строка результат'); for i: =1 to length(s) do begin if not(s[i] in [' ',',','.',': ','; ','/','+','-','*'] )then begin if s[i] in ['0'..'9'] then inc(k); write(s[i]) end; end; writeln; writeln('количество цифр в строке ',k); readln end. 2: видоизменить программу так чтобы она подсчитывала количество знаков препинания в исходной строке и печатала все, кроме цифр.
101
437
Ответы на вопрос:
Program demoset; uses crt; var s: string; i,k: integer; begin k: =0; clrscr; write('введите произвольную строку => '); readln(s); writeln('строка результат'); for i: =1 to length(s) do begin if not(s[i] in [1234567890] )then begin if s[i] in ['0'..'9'] then inc(k); write(s[i]) end; end; writeln; writeln('количество цифр в строке ',k); readln end
Фрагмент кода, в котором осуществляется расчет. не забудь объявить массив и переменную для суммы и индекса. удачи. sum: =0; for i : = n downto n-6 do begin sum: = sum + arr[i]; end;
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
abra12323.06.2021 01:23
-
arina127109.07.2020 16:37
-
duk73p0711711.08.2022 18:13
-
nestann19.02.2023 19:44
-
irina89519.05.2023 06:29
-
stanislavgulya06.05.2020 20:07
-
РікаРо06.02.2020 07:31
-
egorjanov220015.02.2021 17:15
-
linochka108316.10.2021 19:16
-
Vikof01.11.2021 12:40
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.