Вопрос по информатике:
С клавиатуры вводится строка, состоящая из чисел, разделенных одним пробелом. Составить вторую строку, которая состоит из чисел, равных сумме цифр каждого числа исходной строки.
Пожаловаться
- 04.12.2017 08:51
- Информатика
- remove_red_eye 6106
- thumb_up 48
Ответы и объяснения 1
// PascalABC.NET 3.2, сборка 1439 от 09.05.2017
// Внимание! Если программа не работает, обновите версию!
function SumDig(n:integer):integer;
begin
Result:=0;
while n>0 do begin
Result+=n mod 10;
n:=n div 10
end
end;
begin
var s:=ReadlnString.ToIntegers.Select(n->SumDig(n)).JoinIntoString('');
s.Println
end.
Пример
123 4355 12 221 9865620 32331 223234 12232
6173536121610
// Внимание! Если программа не работает, обновите версию!
function SumDig(n:integer):integer;
begin
Result:=0;
while n>0 do begin
Result+=n mod 10;
n:=n div 10
end
end;
begin
var s:=ReadlnString.ToIntegers.Select(n->SumDig(n)).JoinIntoString('');
s.Println
end.
Пример
123 4355 12 221 9865620 32331 223234 12232
6173536121610
Пожаловаться
- 05.12.2017 21:55
- thumb_up 38
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.
Новые вопросы
Интересные вопросы