Составить программу которая вычисляет сумму цифр трехзначного числа

Я не занимаюсь составлением программ и помнить формулы прогрессий тоже не в состоянии. Однако найти сумму всех трехзначных чисел не сложно. надо просто скомбинировать их правильным образом. Для начала отбросим число 100 и 550, которые пригодятся на последнем этапе подсчета. Потом обратим внимание, что 101+999 = 1100. Такая же сумма будет у всех остальных пар чисел до 549+551.

Остается определить, сколько же пар чисел мы имеем 549-100 = 449. Теперь просто умножаем 449 на 1100, и добавляем к этому произведению отброшенные ранее числа 100 и 550. Получается 494550.

Только не надо путаться и добавлять 1000 — это уже четырехзначное число.

автор вопроса выбрал этот ответ лучшим

Источник: www.bolshoyvopros.ru

Составить программу которая вычисляет сумму цифр трехзначного числа

Мне нужно написать небольшую прогу, вот она:

Решение простых задач на python | Вычислить сумму цифр трёхзначного числа


«Составить программу,которая подсчитывает сумму цифр введенного трехзначного числа,например,введено 123, рез-тат 1+2+3=6» .
ПОмогите пожалуиста. Спасибо.

Пользователь
Регистрация: 07.03.2008
Сообщений: 12
Помогите пожалуиста!
Регистрация: 13.10.2007

Сообщений: 2,740

Если число конкретно трехзначное, то это просто. Третья цифра=N mod 10, т.е. остаток от деления на 10. Первая цифра=N div 100, т.е. целая часть числа от деления на 100. Тогда вторая цифра=N div 10 mod 10. Ну а сейчас все надо сложить.

Пользователь
Регистрация: 07.03.2008
Сообщений: 12
ага, спасибо, кажись понял ,сеичас буду пробовать
Форумчанин
Регистрация: 03.02.2008
Сообщений: 213
Вот смотри, все довольно просто.

var i,n,sum:integer; begin writeln(‘Vvedite chislo’); readln(n); sum:=0; for i:=1 to 1 do begin sum:=sum+(n mod 10); n:=n div 10; if(n=0) then break; i:=i-1; end; writeln(sum); readln; end.
Пишу программы на заказ, контакты под аватаром!
Отзывы тут
Пользователь
Регистрация: 01.03.2008
Сообщений: 25
Я бы немного переписал :
var i,n,sum:integer; begin writeln(‘Vvedite chislo’); readln(n); sum:=0; While n>0 do begin sum:=sum+(n mod 10); n:=n div 10; end; writeln(sum); readln; end.
Последний раз редактировалось Шаман; 21.03.2008 в 11:08 .
Веб-разработчик
Форумчанин
Регистрация: 16.01.2008
Сообщений: 451

Читайте также:
Чем отличается вкладки окна программы word что называется группами кнопок

Хм. вообще по сути не 1 из 2-х вариантов не соответствует алгоритму пупорева и не решает задачу, первый только находит все числа, второй тоже самое, только еще без счетчика. Да и вообще если заранее известно количество чисел зачем циклы.

var n,a,b,c,sum:integer; begin write(‘Vvedite chislo ‘); readln(n); a:=n div 100; b:=n div 10 mod 10; c:=n mod 10; sum:=a+b+c; writeln(‘summa chisel: ‘,sum); readln; end.
Я ваш новый друг, смиритесь!

Источник: www.programmersforum.ru

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

Найдите правильный ответ на вопрос ✅ «Составьте программу на языке Паскаль: Найти сумму цифр трёхзначного числа. . » по предмету Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.

Сумма цифр трёхзначного числа. Уроки программирования на С++ для начинающих.

Новые вопросы по информатике

Написать программу, которая выводит на экран результаты следующих действий: 27-5= 11+21= 32/2= 2+2*2= (2+2) * 2= Написать программу, которая выводит на экран результаты следующих действий: 21-4= 21+11= 43/3= 3+3*3= (3+3) * 3=

Вариант 2 1. Даны три числа. Найдите сумму второго и третьего числа. Найдите квадрат первого числа. 2. Даны длины сторон прямоугольника. Найдите площадь прямоугольника. 3. Даны длины катетов прямоугольного треугольника.

Найдите периметр треугольника.

Почему при А=1, В=1, С=1 ответ АVВ равно 1?

2. Какое значение будет иметь переменная b после выполнения следующих операторов присваивания: a:=3; b:=a+9; b:=a+b; b:=a-b+b/a. 3.

Источник: iotvet.com

Рейтинг
( Пока оценок нет )
Загрузка ...
EFT-Soft.ru