Форум программистов, компьютерный форум, киберфорум
Наши страницы

Pascal ABC

Войти
Регистрация
Восстановить пароль
 
trik
0 / 0 / 0
Регистрация: 16.10.2013
Сообщений: 8
#1

Получить все трехзначные натуральные числа, сумма цифр которых равна n - Pascal ABC

18.10.2013, 21:06. Просмотров 556. Ответов 3
Метки нет (Все метки)

дано натуральное число <=27 найти все трёхзначные числа сумма цифр которых равна n не используя mod и div помогите пожалуйста
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
18.10.2013, 21:06
Здравствуйте! Я подобрал для вас темы с ответами на вопрос Получить все трехзначные натуральные числа, сумма цифр которых равна n (Pascal ABC):

Все трехзначные натуральные числа, сумма цифр которых равна М - Pascal ABC
С клавиатуры вводится натуральное число М (М&lt;27). Найдите и выведите на экран все трехзначные натуральные числа, сумма цифр которых равна...

Найдите и выведите на экран все трехзначные натуральные числа, сумма цифр которых равна М - Pascal ABC
С клавиатуры вводится натуральное число М (М&lt;27). Найдите и выведите на экран все трехзначные натуральные числа, сумма цифр которых равна...

Найти все натуральные трехзначные числа, сумма крайних цифр которых равна заданному натуральному - Pascal ABC
Ребята, помогите! Найти все натуральные трехзначные числа, сумма крайних цифр которых равна заданному натуральному числу А, а само число ...

Найти все трехзначные числа, сумма цифр которых равна N - Pascal ABC
Дано натуральное число n. Найти все трехзначные числа, сумма цифр которых равна N. Операции деления, целочисленного деления и определения...

Найти все трехзначные числа, сумма цифр которых равна N - Pascal ABC
Итак,мне нужно решить задачку,не используя массивы(mass,array ну и т.п)а просто со циклами там всякими,вложенными например,так вот 2...

Вывести на экран все трехзначные числа, сумма цифр которых равна N - Pascal ABC
10. Вывести на экран все трехзначные числа, сумма цифр которых равна N. Пытаться перебирать все трехзначные числа от 100 до 999, затем...

3
Folko
265 / 253 / 7
Регистрация: 27.09.2013
Сообщений: 877
Записей в блоге: 1
18.10.2013, 22:35 #2
trik, 3 вложенных цикла от 1 до 10, и в условии проверять i+j+k = x (это введенное число). Примерно так
0
PiKa_PeR
0 / 0 / 0
Регистрация: 16.11.2016
Сообщений: 6
16.11.2016, 15:42 #3
Pascal
1
2
3
4
5
6
7
8
var a1, a2, a3, n:longint;
begin
readln(n);
for a1:=1 to 9 do
 for a2:=1 to 9 do
  for a3:= 1 to 9 do
  if a1+a2+a3=n then writeln (a1*100+a2*10+a3);
end.
0
Cyborg Drone
Модератор
4828 / 2997 / 1204
Регистрация: 17.08.2012
Сообщений: 9,580
21.11.2016, 22:53 #4
PiKa_PeR, у Вас учитываются не все числа. И незачем формировать число, если оно не запоминается, достаточно просто его напечатать.
Pascal
5
6
7
 for a2 := 0 to 9 do
  for a3 := 0 to 9 do
  if a1+a2+a3 = n then writeln (a1, a2, a3);
0
21.11.2016, 22:53
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
21.11.2016, 22:53
Привет! Вот еще темы с ответами:

Выведите в порядке возрастания все трехзначные числа, сумма цифр которых равна n - Pascal ABC
Дано натуральное число n. Выведите в порядке возрастания все трехзначные числа, сумма цифр которых равна n.Спасибо.

Вывести все трехзначные числа сумма цифр которых равна заданному числу N - Pascal ABC
Вложенные циклы. Вывести все трехзначные числа сумма цифр которых равна заданному числу N Программа не полностью работает,...

Вывести все трехзначные числа, для которых сумма цифр равна введённому числу - Pascal ABC
Решите пожалуйста срочно задачу!

Найти все трехзначные числа, сумма цифр которых равна данному целому числу - Pascal ABC
Найти все трехзначные числа, сумма цифр которых равна данному целому числу.


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

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.