Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
rudembatalov
02.06.2022 19:21 •
Другие предметы
Запросить у пользователя строку S, состоящую из цифр. Преобразовать каждый символ – цифру в число. Найти сумму и произведение
Показать ответ
Ответ:
good129
16.04.2019 23:00
var
s: string;
err, k, sum, i: integer;
p: real;
begin
readln(s);
sum := 0;
p := 1;
for i := 1 to length(s) do
if s[i] in ['0'..'9'] then
begin
val(s[i], k, err);
p := p * k;
sum := sum + k;
end;
writeln('Сумма цифр: ', sum);
writeln('Произведение цифр: ', p);
end.
0,0
(0 оценок)
Популярные вопросы: Другие предметы
TheCool111
20.06.2020 15:26
Задача 1. Определите массовую долю вещества, если для приготовления раствора 17 г порошка растворили в 83 г воды КТО НЕЗНАЕТ ОТВЕТ НЕ ПИШИТЕ МНЕ СКОРО ОТПРАВЛЯТЬ...
lesta2
31.10.2020 02:20
Задание 6. Масса воды в стакане 200 г, масса сахара в одной чайной ложке 5 г. Айгерим положила в стакан чая две ложки сахара, а Дамир одну ложку. Определите массовую долю сахара...
У4еник738
17.11.2022 05:02
Зимним вечером Саяхат делал уроки и почувствовал запах баурсаков, которые жарилаАже на кухне Заглянув на кухню, он спроси:Аже, я думал, вы жарите баурсаки?Нет, балам, я закончила...
Котик2841
09.10.2022 08:11
найти ошибки в чертеже и исправить ( 5 вариант)...
fhshjshetubehdh
11.08.2020 18:01
Определи и запиши о пользе и вреде ветра. Польза1.2.Вред1.2. СОЧ ПО ЕСТЕСТВОЗНАНИЕ...
veraveta
21.02.2020 15:22
Гостроверхі споруди зі стрілчастими склепіннями, великою кількістю кам яного різьблення і скульптурних прикрас характерні для архітектури:...
KMasha11
13.02.2021 02:47
1. Спиши текст. Нарисуй схему к слову «еловые» и укажи количество букв и звуков. В лесу росли ели и сосны. Дети собирали сосновые и еловые шишки. Ребятапринесли в школу большие...
GoldChery
07.01.2021 16:00
Найти любую эмпирическую статью по психолого-педагогической проблематике, прочитать её и написать рецензию Найти статьи можно, например, на этом портале https://psyjournals.ru/exp/...
alexandra189
26.03.2020 07:27
Вещества которые получены в результате природных веществ называют...
Ksyxa03
29.09.2022 00:27
53/lesson Определите факторы, характеризующие вклад кочевников в развитие мировой цивилизации.RU Русский (Россия)Верных ответов: 4изобретение колеса с железными спицамипервые в...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
s: string;
err, k, sum, i: integer;
p: real;
begin
readln(s);
sum := 0;
p := 1;
for i := 1 to length(s) do
if s[i] in ['0'..'9'] then
begin
val(s[i], k, err);
p := p * k;
sum := sum + k;
end;
writeln('Сумма цифр: ', sum);
writeln('Произведение цифр: ', p);
end.