Вычислить сумму цифр заданного массива - Pascal ABC

Pascal ABC

Форум программистов и сисадминов Киберфорум

Войти

Регистрация
Восстановить пароль

Рейтинг 4.71/7:

@Shah69 0 / 0 / 0 Регистрация: 24.10.2016 Сообщений: 36

	Вычислить сумму цифр заданного массива 30.10.2016, 18:20. Показов 1458. Ответов 1 Метки нет (Все метки) Ввести целочисленный массив,состоящий из 17 элементов(двузначные целые числа).Вычислить сумму цифр этого массива. Заранее всем огромное спасибо ! 0

Лучшие ответы (1)

Сообщение: #9707011

Programming

Эксперт

39485 / 9562 / 3019

Регистрация: 12.04.2006

Сообщений: 41,671

Блог

30.10.2016, 18:20

Ответы с готовыми решениями:

Вычислить сумму цифр суммы цифр заданного натурального числа используя рекурсивный алгоритм
Вычислить сумму цифр суммы цифр заданного натурального числа используя рекурсивный алгоритм. Входные данные: Во входном потоке...

Вычислить сумму цифр числа, являющегося произведением цифр заданного целого трехзначного числа
Вычислить сумму цифр числа, являющегося произведением цифр заданного целого трехзначного числа. Входные данные: Во входном потоке...

Вычислить сумму цифр заданного натурального двухзначного числа A
Вычислить сумму цифр заданного натурального двухзначного числа A. Входные данные: Во входном потоке записано единственное натуральное...

Puporev

Почетный модератор

64315 / 47611 / 32743

Регистрация: 18.05.2008

Сообщений: 115,167

30.10.2016, 18:35

Сообщение было отмечено Shah69 как решение

Решение

Pascal
1
2
3
4
5
6
const n=17;
......................
//ввод элементов массива
s:=0;
for i:=1 to n do
s:=s +a[i] div 10+a[i] mod 10;

Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.

inter-admin

Эксперт

29715 / 6470 / 2152

Регистрация: 06.03.2009

Сообщений: 28,500

Блог

30.10.2016, 18:35

Помогаю со студенческими работами здесь

Вычислить сумму нечётных цифр заданного натурального числа.
Вычислить сумму нечетных цифр заданного натурального числа. Входные данные: Во входном потоке задано единственное натуральное число...

Вычислить сумму цифр заданного целого трехзначного числа
Вычислить сумму цифр заданного целого трехзначного числа. Входные данные: Во входном потоке задано единственное целое трехзначное число...

Вычислить сумму квадратов цифр заданного натурального числа N
Например, для заданного числа 123 вычислить .

Вычислить сумму четных цифр заданного натурального числа
Входные данные: Во входном потоке задано единственное натуральное число N (N <= 2000000000) Выходные данные: В выходной поток...

Вычислить сумму квадратов цифр заданного целого двухзначного числа
Вычислить сумму квадратов цифр заданного целого двухзначного числа. Входные данные: Во входном потоке задано единственное целое...

Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:

Новые блоги и статьи Все статьи Все блоги /
Программный контроль заполнения реквизита табличной части документа Maks 02.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать контроль заполнения реквизита "ПричинаСписания". . .	wmic не является внутренней или внешней командой Maks 02.04.2026 Решение: DISM / Online / Add-Capability / CapabilityName:WMIC~~~~ Отсюда: https:/ / winitpro. ru/ index. php/ 2025/ 02/ 14/ komanda-wmic-ne-naydena/	Программная установка даты и запрет ее изменения Maks 02.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: при создании документов установить период списания автоматически. . .	Вывод данных в справочнике через динамический список Maks 01.04.2026 Реализация из решения ниже выполнена на примере нетипового справочника "Спецтехника" разработанного в конфигурации КА2. Задача: вывести данные из ТЧ нетипового документа. . .
Программное заполнения текстового поля в реквизите формы документа Maks 01.04.2026 Алгоритм из решения ниже реализован на нетиповом документе "ВыдачаОборудованияНаСпецтехнику" разработанного в конфигурации КА2, в дополнении к предыдущему решению. На форме документа создается. . .	К слову об оптимизации kumehtar 01.04.2026 Вспоминаю начало 2000-х, университет, когда я писал на Delphi. Тогда среди программистов на форумах активно обсуждали аккуратную работу с памятью: нужно было следить за переменными, вовремя. . .	Идея фильтра интернета (сервер = слой+фильтр). Hrethgir 31.03.2026 Суть идеи заключается в том, чтобы запустить свой сервер, о чём я если честно мечтал давно и давно приобрёл книгу как это сделать. Но не было причин его запускать. Очумелые учёные напечатали на. . .	Модель здравосоХранения 6. ESG-повестка и устойчивое развитие; углублённый анализ кадрового бренда anaschu 31.03.2026 В прикрепленном документе раздумья о том, как можно поменять модель в будущем

Наверх