Программа на паскаль, которая находит числа у которых сумма цифр трехзначного числа кратна 7, а само число также делится на 7
Следующая программа Паскаль на тему «Цикл с параметром» находит числа у которых сумма цифр трехзначного числа кратна 7, а само число также делится на 7. Программа тоже довольно простая, но пояснительных комментариев нет. У данной программы есть небольшая схожесть с предыдущей.
Исходный код задачи на паскаль:
Var a,b,c,d,i,s:integer; Begin For i:=100 to 999 do begin a:=i div 100; b:=i mod 10; c:=i mod 100; d:=c div 10; s:=a+b+d; if (s mod 7=0) and (i mod 7=0) then write(i,' '); end; End.Исправленное решение задачи от пользователя Антон:
Var a,b,c,d,i,s:integer; Begin For i:=100 to 999 do begin a:=i div 100; b:=i mod 10; c:=i mod 100; d:=c div 10; s:=a+b+d; if (s/7=1) and (i mod 7=0) then write(i,' '); end; End.Если возникнут вопросы по поводу задачи и Вы напишите их в комментариях или с помощью личных сообщений, то я постараюсь дать на них ответы.
Скачать исходник: pas13for.pas
Кстати, если Вы хотите купить туфли для танцев, то зайдите на сайт danceshop.ru.
Выдайте все трехзначные числа, которые делятся на 7, и у которых при этом сумма цифр также делится на 7 [закрыт]
Закрыт. Данный вопрос необходимо конкретизировать. Ответы на него в данный момент не принимаются.
Хотите улучшить этот вопрос? Переформулируйте вопрос так, чтобы он был сосредоточен только на одной проблеме.
Закрыт 8 лет назад .
Выдайте все трехзначные числа, которые делятся на 7, и у которых при этом сумма цифр также делится на 7. Входных данных у этого алгоритма нет. Подскажите, как вписать входные данные, если их нет. По-моему, число нужно обозначить переменной, выделить из него цифры из разряда сотен, десятков и единиц. Далее их просуммировать и через условие «сумма кратна 7 и само число кратно 7» вывести ответ. Вот только с входными данными проблема
Найти все трехзначные числа с суммой цифр кратной 7, само число также делится на 7
Найти все трехзначные числа, сумма цифр которых кратна 7, и само число также делится на 7
#include <stdio.h> #include <stdlib.h> #include <math.h> int main() < int a,b,c,d,i=100,s;.
Найти все трехзначные числа, сумма цифр которых равна А, а само число делится на В. А и В задаются.
Всем доброе время суток. Помогите пожалуйста написать программу по вот этой задачи — Найти все.
Найти все трёхзначные натуральные числа, которые состоят из разных цифр, а само число делится на 3
Здравствуйте. Нужно решить задачу. Найти все трёхзначные натуральные числа, которые состоят из.
Найти все трехзначные числа, такие, что сумма цифр равна А, а само число делится на В
А и В вводятся с клавиатуры.
3560 / 2501 / 1174
Регистрация: 14.08.2016
Сообщений: 8,206
1 2 3 4
for (int i = 100; i 1000; i++) { if (i % 7 == 0 && (i / 100 + i % 100 / 10 + i % 10) % 7 == 0) Console.WriteLine(i); }
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
Помогаю со студенческими работами здесь
Найти все трехзначные числа, такие, что сумма цифр равна А, а само число делится на B
помогите
Сумма цифр трехзначного числа кратна 7, само число также делится на 7. Найти все такие числа
Помогите составить программу на С++. Сумма цифр трехзначного числа кратна 7, само число также.
Сумма цифр трехзначного числа кратна 7, само число также делится на 7. Найти все такие числа.
Сумма цифр трехзначного числа кратна 7, само число также делиться на 7. Найти все такие числа.
Сумма цифр трёхзначного числа кратна 7, само число также делится на 7. Найти все такие числа.
1) Сумма цифр трёхзначного числа кратна 7, само число также делится на 7. Найти все такие числа .
Или воспользуйтесь поиском по форуму:
Запишите трехзначное число сумма цифр которого равна 7
1. Приведите пример четырехзначного числа, первая цифра которого равна количеству нулей в этом числе, вторая цифра равна числу единиц, третья — числу двоек, четвертая — числу троек.
2. Девочка заменила каждую букву в своём имени её номером в русском алфавите. Получилось число 2011533. Как её зовут?
3. Разрежьте квадрат на четыре части так, чтобы каждая часть соприкасалась (т.е. имела общие участки границы) с тремя другими.
4. В комнате находятся 85 воздушных шаров — красных и синих. Известно, что: 1) по крайней мере один из шаров красный; 2) из каждой произвольно выбранной пары шаров по крайней мере один синий. Сколько в комнате красных шаров?
5. На дискотеку собрался почти весь класс — 22 человека. Лена танцевала с 7 мальчиками, Нина с восемью, Вера — с девятью и так далее до Ирины, которая танцевала со всеми мальчиками из этого класса. Сколько мальчиков было в этом классе?
6. Трехзначное число начинается с цифры 5. Из него получили другое трехзначное число, переставив эту цифру в конец числа. Оказалось, что получившееся число на 153 меньше первоначального. Найдите исходное число.
7. В обыкновенном наборе домино 28 косточек. Сколько косточек содержал бы набор домино, если бы значения, указанные на косточках, изменялись не от 0 до 6, а от 0 до 14?
8. Пять первоклассников стояли в шеренгу и держали 37 флажков. У всех школьников, стоящих справа от Тани — 14 флажков, справа от Яши — 32, справа от Веры — 20, справа от Максима — 8. Сколько флажков у Даши?
9. Наполненный доверху водой сосуд весит 5 кг, а наполненный наполовину — 3 кг 250 г. Сколько воды вмещает сосуд?
10. Собака гонится за кроликом, находящимся в 150 метрах от неё. Она делает прыжок в 9 метров каждый раз, когда кролик прыгает на 7 метров. Сколько прыжков должна сделать собака, чтобы догнать кролика?
Ответ. 75 прыжков
11. Сколькими способами из полной колоды (52 карты) можно выбрать 4 карты разных мастей и достоинств?
12. Найдите последнюю цифру произведения всех нечётных чисел от 1 до 99.
13. Сколько взвешиваний на чашечных весах потребуется, чтобы определить одну фальшивую монету среди семи? (Известно, что фальшивая монета — легче настоящей)
14. В написанном на доске примере на умножение хулиган Петя исправил две цифры. Получилось 4 х 5 х 4 х 5 х 4 = 2247. Восстановите исходный пример.
Ответ. 4 х 5 х 4 х 7 х 4 = 2240
15. 10 игроков играли в теннис. Проигравший игру обижался и уходил. Какое наибольшее число теннисистов могло выиграть по две партии?
16. Сколько существует различных квадратов со сторонами, идущими по линиям сетки квадрата 4×4?
17. Запах от цветущего кустика ландышей распространяется в радиусе 20 м вокруг него. Сколько цветущих кустиков ландышей необходимо посадить вдоль прямолинейной 400-метровой аллеи, чтобы в каждой ее точке пахло ландышем?
18. Сколько последовательных натуральных чисел, начиная с 1, надо сложить, чтобы получить трехзначное число, записываемое одинаковыми цифрами?
19. Коля и Вася за январь получили по 20 оценок, причём Коля получил пятерок столько же, сколько Вася четвёрок, четвёрок столько же, сколько Вася троек, троек столько же, сколько Вася двоек, и двоек столько же, сколько Вася — пятёрок. При этом средний балл за январь у них одинаковый. Сколько двоек за январь получил Коля?
20. Куб 3x3x3 составлен из 27 одинаковых кубиков. Со всех шести сторон мы видим квадрат 3×3. Какое наибольшее количество кубиков можно убрать, чтобы куб не развалился и мы по-прежнему с каждой стороны видели квадрат 3×3? (куб разваливается, если какой-то кубик не имеет общих точек с остальными или граничит только вершиной).
Указание. Попробуйте убрать 18 кубиков.
- ЗАДАЧИ
- 7 класс
- Олимпиада
- Метод крайнего
- Графы — 1
- Множества
- Лингвистика
- Индукция
- Пространственное воображение
- Математическая карусель
- Графы — 2
- Раскраска
- Неравенства и оценки
- Логика
- Делимость
- Системы счисления
- Принцип Дирихле
- ДОМАШНИЕ ЗАДАНИЯ
- Домашнее задание 2
- Домашнее задание 3
- Домашнее задание 4
- Домашнее задание 5
- Домашнее задание 6
- Домашнее задание 7
- Домашнее задание 8
- Домашнее задание 9
- Домашнее задание 10
- Домашнее задание 11
- Домашнее задание 12
- Домашнее задание 13
- Домашнее задание 14
- Домашнее задание 15
- Домашнее задание 16
- Домашнее задание 17
- Домашнее задание 18
- Домашнее задание 19
- Домашнее задание 22
- Домашнее задание 23
- Домашнее задание 24
- Домашнее задание 25
- Домашнее задание 27
| Вы видите ошибку? Выделите её и нажмите Ctrl+Enter! | | | |