Сумма делителей - Pascal

Pascal (Паскаль)

Форум программистов и сисадминов Киберфорум

Войти

Регистрация
Восстановить пароль

Рейтинг 4.67/6:

Taigong_Wang

	Сумма делителей 22.11.2013, 09:56. Показов 1212. Ответов 1 Метки нет (Все метки) Подсчитать сумму натуральных делителей числа х (включая 1 и само число;x<=30000). Примеры Входные данные Выходные данные 6 12 5 6

Лучшие ответы (1)

Сообщение: #5373166

cpp_developer

Эксперт

20123 / 5690 / 1417

Регистрация: 09.04.2010

Сообщений: 22,546

Блог

22.11.2013, 09:56

Ответы с готовыми решениями:

Сумма всех делителей
Пользователь задает трехзначное число в диапазоне от 100 до 467. Определить сумму всех делителей введенного числа. Представить делители...

Целые числа, Сумма делителей = K
Прошу помочь:) найти все целые числа из промежутков от 100 до 300 у которых сумма делителей равна К(К вводится с клавиатуры) такая...

Сумма делителей числа (программа с подпрограммой)
Задание: Написать подпрограмму, которая вычисляет сумму делителей данного натурального числа. Вот у меня эта программа имеется, но...

ПерС

587 / 490 / 371

Регистрация: 05.11.2013

Сообщений: 1,271

Записей в блоге: 6

22.11.2013, 13:43

Сообщение было отмечено как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
var x,i:integer; s:longint;
begin
 write ('Введите значение X='); readln (x);
 s:=1+x;
 for i:=2 to x div 2 do if x mod i = 0 then s:=s+i;
 writeln ('Сумма=',s);
 write ('ENTER для выхода');
 readln;
end.

Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.

raxper

Эксперт

30234 / 6612 / 1498

Регистрация: 28.12.2010

Сообщений: 21,154

Блог

22.11.2013, 13:43

Помогаю со студенческими работами здесь

Сумма общих делителей двух чисел
приветствую. Пришел с такой задачей. Составить программу, которая определяет для двух вводимых натуральных чисел M и N сумму их общих...

Сумма делителей числа, и Вывести результат операции вставки кода.
Добрый вечер, вот такие задачки 1. Ввести 3 числа. Третье число – код операции между первыми двумя: 1 – ‘+’, 2 – ‘-’, 3 -‘*’. Вывести...

Найти количество трехзначных чисел, сумма простых делителей которых кратна 5
Помогите решить задачу в паскале: Найти количество трехзначных чисел, сумма простых делителей которых кратна 5.

Найти сумму элементов матрицы, у которых сумма делителей меньше заданного числа
Дана прямоугольная таблица, которая содержит не более 10 строк и не более 10 столбцов. Найти сумму элементов, у которых сумма делителей...

Найти все целые числа из промежутка от 100 до 300, у которых сумма делителей равна K
помогите с задачей :'( Найти все целые числа из промежутка от 100 до 300, у которых сумма делителей равна K(K вводится с клавиатуры). ...

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

Или воспользуйтесь поиском по форуму:

Новые блоги и статьи Все статьи Все блоги /
SDL3 для Web (WebAssembly): Обработчик клика мыши в браузере ПК и касания экрана в браузере на мобильном устройстве 8Observer8 02.02.2026 Содержание блога Для начала пошагово создадим рабочий пример для подготовки к экспериментам в браузере ПК и в браузере мобильного устройства. Потом напишем обработчик клика мыши и обработчик. . .	Философия технологии iceja 01.02.2026 На мой взгляд у человека в технических проектах остается роль генерального директора. Все остальное нейронки делают уже лучше человека. Они не могут нести предпринимательские риски, не могут. . .	SDL3 для Web (WebAssembly): Вывод текста со шрифтом TTF с помощью SDL3_ttf 8Observer8 01.02.2026 Содержание блога В этой пошаговой инструкции создадим с нуля веб-приложение, которое выводит текст в окне браузера. Запустим на Android на локальном сервере. Загрузим Release на бесплатный. . .	SDL3 для Web (WebAssembly): Сборка C/C++ проекта из консоли 8Observer8 30.01.2026 Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .
SDL3 для Web (WebAssembly): Установка Emscripten SDK (emsdk) и CMake для сборки C и C++ приложений в Wasm 8Observer8 30.01.2026 Содержание блога Для того чтобы скачать Emscripten SDK (emsdk) необходимо сначало скачать и уставить Git: Install for Windows. Следуйте стандартной процедуре установки Git через установщик. . . .	SDL3 для Android: Подключение Box2D v3, физика и отрисовка коллайдеров 8Observer8 29.01.2026 Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами. Версия v3 была полностью переписана на Си, в. . .	Инструменты COM: Сохранение данный из VARIANT в файл и загрузка из файла в VARIANT bedvit 28.01.2026 Сохранение базовых типов COM и массивов (одномерных или двухмерных) любой вложенности (деревья) в файл, с возможностью выбора алгоритмов сжатия и шифрования. Часть библиотеки BedvitCOM Использованы. . .	SDL3 для Android: Загрузка PNG с альфа-каналом с помощью SDL_LoadPNG (без SDL3_image) 8Observer8 28.01.2026 Содержание блога SDL3 имеет собственные средства для загрузки и отображения PNG-файлов с альфа-каналом и базовой работы с ними. В этой инструкции используется функция SDL_LoadPNG(), которая. . .

Наверх