6 / 6 / 1
Регистрация: 16.09.2010
Сообщений: 54
1

Найти количество делителей каждого из целых чисел от 480 до 500

16.10.2012, 19:21. Показов 2165. Ответов 2
Метки нет (Все метки)

Найти количество делителей каждого из целых чисел от 480 до 500. Вывести результат в
виде таблицы (с переносом по строкам, если все делители не вмещаются в одной строке)
Число Делители Кол.дел.
99 3, 9, 11, 33 4
100 2, 4, 5, 10,
20, 25, 50 7
101 ... ...
Определить наибольшее число из данного интервала, у которого количество делителей
максимально.
__________________
Помощь в написании контрольных, курсовых и дипломных работ, диссертаций здесь
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
16.10.2012, 19:21
Ответы с готовыми решениями:

Найти количество делителей каждого из целых чисел от 120 до 140
Найти количество делителей каждого из целых чисел от 120 до 140.

Найти количество делителей каждого из целых чисел от 120 до 140.
Найти количество делителей каждого из целых чисел от 120 до 140.

Найти сумму делителей каждого из целых чисел
Найти сумму делителей каждого из целых чисел от 480 до 500. Вывести результат в виде таблицы (с...

Работа с циклическими конструкциями. Найти сумму делителей каждого из целых чисел от 300 до 320
Найти количество делителей каждого из целых чисел от 280 до 300. Вывести результат в виде таблицы...

2
6 / 6 / 1
Регистрация: 16.09.2010
Сообщений: 54
22.10.2012, 01:32  [ТС] 2
Число____Делители_______Кол.дел.
99_______3, 9, 11, 33_____4
100______2, 4, 5, 10,
_________20, 25, 50______7
101______..._____________...
0
Почетный модератор
7965 / 3936 / 2464
Регистрация: 30.10.2011
Сообщений: 5,377
22.10.2012, 01:56 3
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

вариант А
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
25
26
27
28
29
30
31
32
uses crt;
const l='---------------------------------------------------------------------';
      s='| Число |                     Делители                    |  Кол-во |';
var i,j,kd: integer;
    ns: boolean;
 
begin
writeln(l);
writeln(s);
writeln(l);
for i:=480 to 500 do
    begin
    kd:=0; ns:=false;
    write('|',i:5,'  | ');
    for j:=2 to i div 2 do
        if i mod j=0 then
           begin
           inc(kd);
           if kd mod 12=0 then
              begin
              writeln('|         | ':16);
              write('|       | ');
              ns:=true;
              end;
           write(j:3,',');
           end;
    if ns then for j:=1 to 11-(kd mod 12) do write('    ')
       else for j:=1 to 12-(kd mod 12) do write('    ');
    writeln('|',kd:5,'|':5);
    end;
write(l);
end.
1
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
22.10.2012, 01:56
Помогаю со студенческими работами здесь

Найти количество целых чисел из промежутка от 5 до 40, у которых сумма делителей больше 15
Найти количество целых чисел из промежутка от 5 до 40, у которых сумма делителей больше 15 (паскаль)

Найти сумму всех целых чисел от a до 500 (значение a вводится с клавиатуры; a<=500)
Помогите решить задание плизз) Ну, 3 раза уже перездавал все задачи, а учитель говорит, что...

Найти количество делителей каждого из целых чисел от 120 до 140
помогите с задачей:Найти количество делителей каждого из целых чисел от 120 до 140.плизззз

Найти количество делителей каждого из целых чисел от 120 до 140
Кто может помогите написать программу в паскале: 1)Найти количество делителей каждого из целых...


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2022, CyberForum.ru