0 / 0 / 0
Регистрация: 14.12.2018
Сообщений: 33
1

Найти все натуральные трехзначные числа, сумма цифр которых кратна заданному натуральному числу B и само число также дел

16.12.2018, 22:25. Показов 3897. Ответов 1
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Составить программу на языке Паскаль:
Найти все натуральные трехзначные числа, сумма цифр которых кратна заданному натуральному числу B и само число также делится на B.
0
Лучшие ответы (1)
16.12.2018, 22:25
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
16.12.2018, 22:25
Ответы с готовыми решениями:

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

Найти все трёхзначные натуральные числа, сумма цифр которых равна заданному числу N
Помогите, пожалуйста, решить задачу...Третий час бьюсь. Вот более полный текст: Вот код, который написал я (использовал Lazarus)....

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

1
233 / 32 / 19
Регистрация: 10.06.2016
Сообщений: 123
17.12.2018, 06:27 2
Лучший ответ Сообщение было отмечено QOLaaS как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
function S(i:integer):integer;
var
  r:integer;
begin
  r:=0;
  while i>0 do begin
    r:=r+i mod 10;
    i:=i div 10;
  end;
  S:=r;
end;
var
  b,i:integer;
  z:boolean;
begin
  write('B=');readln(b);
  z:=true;
  for i:=100 to 999 do
    if (i mod b=0) and (b mod S(i)=0)  then begin
      z:=false;
      write(i,' ');
    end;
  if z then writeln('Нет чисел,удовлетворяющих условию');
end.
1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
17.12.2018, 06:27
Помогаю со студенческими работами здесь

Найти все трехзначные числа, сумма цифр которых кратна 7, и само число также делится на 7
#include <stdio.h> #include <stdlib.h> #include <math.h> int main() { int a,b,c,d,i=100,s; while(i<999){ a = i / 100; b...

Найти все трехзначные натуральные числа, сумма цифр которых равна В, а само число состоит из разных цифр
using System; using System.Collections.Generic; using System.Linq; using System.Text; namespace ConsoleApplication1 { ...

Найти все трехзначные натуральные числа, сумма цифр которых равна В, а само число состоит из разных цифр
Выполнить задание на C# Найти все трехзначные натуральные числа, сумма цифр которых равна В, а само число состоит из разных цифр ...

Найти все трехзначные натуральные числа, сумма цифр которых равна В, а само число состоит из разных цифр
Найти все трехзначные натуральные числа, сумма цифр которых равна В, а само число состоит из разных цифр.

Распечатать все трёхзначные числа, сумма цифр которых равна заданному натуральному числу
Очень Нужно Друзья!!! Буду благодарен при содействии. Распечатать все трехзначные числа ,сумма цифр которых равна данному натуральному...


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

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

Редактор формул (кликните на картинку в правом углу, чтобы закрыть)
Опции темы

Новые блоги и статьи
Обработка массивов с помощью циклов в JavaScript
hw_wired 12.02.2025
Массивы в JavaScript - это упорядоченные наборы элементов, где каждый элемент имеет свой индекс, начиная с нуля. Они невероятно гибки в использовании, позволяя хранить данные любых типов - числа,. . .
Создание каталога и всех родительских каталогов с помощью Python
hw_wired 12.02.2025
Работа с файловой системой - одна из ключевых задач при разработке программного обеспечения. Особенно часто возникает потребность создавать каталоги для хранения файлов, логов, временных данных и. . .
Возврат файла к состоянию указанного коммита Git
hw_wired 12.02.2025
Git - распределенная система контроля версий, без которой сложно представить современную разработку программного обеспечения. Когда речь заходит о восстановлении файлов, Git предоставляет целый. . .
Сброс локальной ветки Git до состояния HEAD удаленного репозитория
hw_wired 12.02.2025
Работая в команде разработчиков, часто сталкиваешься с ситуацией, когда локальная версия кода существенно отличается от той, что находится в центральном репозитории. Такое расхождение может. . .
Запрет подсветки выделения текста с помощью CSS
hw_wired 12.02.2025
Выделение текста - одна из базовых возможностей взаимодействия пользователя с контентом на веб-странице. Однако в некоторых случаях стандартное поведение выделения может нарушать задуманный дизайн. . .
Выполнение другой программы из приложения Python
hw_wired 12.02.2025
При разработке современных приложений часто возникает потребность в запуске и взаимодействии с другими программами прямо из кода. Python предоставляет множество эффективных средств для выполнения. . .
Отличия между let и var в JavaScript
hw_wired 12.02.2025
Работа с переменными - один из основных моментов при написании программ на JavaScript. От правильного объявления и использования переменных зависит не только читаемость кода, но и его надежность, а. . .
Подключение файла JavaScript в других файлах JavaScript
hw_wired 12.02.2025
Самый современный и рекомендуемый способ подключения JavaScript-файлов - использование системы модулей ES6 с ключевыми словами 'import' и 'export'. Этот подход позволяет явно указывать зависимости. . .
Отмена изменений, не внесенных в индекс Git
hw_wired 12.02.2025
Управление изменениями в Git - одна из важнейших задач при разработке программного обеспечения. В процессе работы часто возникают ситуации, когда нужно отменить внесенные изменения, которые еще не. . .
Что такое px, dip, dp, and sp в Android
hw_wired 12.02.2025
При разработке мобильных приложений для Android одним из ключевых вызовов становится адаптация интерфейса под различные устройства. А ведь их действительно немало - от компактных смартфонов до. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru