Индивидуальные очистные сооружения: К классу индивидуальных очистных сооружений относят сооружения, пропускная способность которых...
Таксономические единицы (категории) растений: Каждая система классификации состоит из определённых соподчиненных друг другу...
Топ:
Методика измерений сопротивления растеканию тока анодного заземления: Анодный заземлитель (анод) – проводник, погруженный в электролитическую среду (грунт, раствор электролита) и подключенный к положительному...
Выпускная квалификационная работа: Основная часть ВКР, как правило, состоит из двух-трех глав, каждая из которых, в свою очередь...
Процедура выполнения команд. Рабочий цикл процессора: Функционирование процессора в основном состоит из повторяющихся рабочих циклов, каждый из которых соответствует...
Интересное:
Аура как энергетическое поле: многослойную ауру человека можно представить себе подобным...
Что нужно делать при лейкемии: Прежде всего, необходимо выяснить, не страдаете ли вы каким-либо душевным недугом...
Финансовый рынок и его значение в управлении денежными потоками на современном этапе: любому предприятию для расширения производства и увеличения прибыли нужны...
Дисциплины:
2019-08-03 | 582 |
5.00
из
|
Заказать работу |
|
|
Решение. Прежде всего договоримся, что 1 и само число не будем считать за делители. Значит нужно проверить делится ли наше число N на такие числа 2,3,4,... N div 2.
Program Task7;
var
n,del: longint; {число и его делители}
k, kd: word; {k-количество всех делителей, kd-колич. делителей кратных 3}
begin writeln(‘введите число’);
readln(n); k:=0; kd:=0;
for d:=2 to n div 2 do { проверяем все числа от 2 до половины числа}
if n mod d=0 then begin {если число на него делится}
inc(k); { то это наш делитель и если}
if d mod 3 =0 then inc(kd); {на 3 делится}
end;
writeln(‘число имеет всего делителей -’,k);
writeln(‘из них кратных 3 -’,kd)
End.
8.3. Задачи для самопроверки.
1. (8)Найти НОД трех чисел.
Примечание. НОД(a,b,c)=НОД(НОД(a,b),c).
2. (9)Два числа называются взаимно простыми, если их наибольший общий делитель равен 1. Проверить, являются ли два данных числа взаимно простыми.
3. (10)Найти наименьшее общее кратное (НОК) чисел n и m, используя соотношение
НОК(n,m)= .
4. (11)Даны натуральные взаимно простые числа n,p. Найдите такое m, что, во-первых, m<p, во-вторых, произведение чисел m и n при делении на p дает остаток 1.
5. (12)От прямоугольника 324х141 отрезают квадраты со сторонами 141, пока это возможно. Затем вновь отрезают квадраты со стороной, равной 324-2*141=42 и т.д. На какие квадраты и на сколько квадратов будет разрезан прямоугольник?
6. (13)Написать программу для нахождения НОД, используя следующие соотношения:
НОД(2a,2b)=2НОД(a,b);
НОД(2a,b)=НОД(a,b) при нечетном b.
В программе не должно использоваться деление с остатком. Можно лишь делить на 2 и проверять числа на четность.
|
7. (14,15,16)Даны натуральные числа m и n. Найти такие натуральные взаимно простые p и q, что
Контрольные задания.
Вариант № 1
1. Найти количество делителей натурального числа. Сколько из них четных?
2. Найти все натуральные числа a, b и с из интервала от 1 до 20, для которых выполняется равенство a2+b2=c2.
Вариант № 2
1. Найти сумму нечетных делителей натурального числа.
2. Найти все равновеликие прямоугольники, стороны которых выражены натуральными числами a, b, а площадь равна S (a и b из интервала от 1 до 20, а площадь вводится с клавиатуры).
Вариант № 3
1. Найти все натуральные числа из промежутка от 1 до 200, у которых количество делителей равно К (К вводится с клавиатуры.)
2. Найти все натуральные числа a, b и с из интервала от 1 до 20, для которых выполняется равенство a+b2=c2.
Вариант № 4
1. Найти все натурального числа из промежутка от 1 до 200, у которых сумма делителей равна С (С вводится с клавиатуры).
2. Найти все такие тройки натуральных чисел a, b и с из интервала от 1 до 20, для которых выполняется равенство a2-b2=c2.
Вариант № 5
1. Найти количество делителей натурального числа, больших К (К вводится с клавиатуры).
2. Найти все натуральные числа a, b и с из интервала от 1 до 20, для которых выполняется равенство a2b=c2.
Вариант № 6
1. Найти сумму целых чисел из промежутка от 1 до 200, у которых ровно 5 делителей.
2. Найти все натуральные числа a, b и с из интервала от 1 до 20, для которых выполняется равенство a3+b3=c3.
Вариант № 7
1. Найти все натурального числа из промежутка от 100 до 300, у которых сумма делителей равна К (К вводится с клавиатуры).
2. Найти все такие тройки натуральных чисел a, b и с из интервала от 1 до 20, для которых выполняется равенство a2+b2-c2=0.
Вариант № 8.
1. Найти все натуральные числа из промежутка от a до b, у которых количество делителей превышает заданное число С.
2. Найти все натуральные числа a, b и с из интервала от 1 до 20, для которых выполняется равенство a+b=c2.
|
Вариант № 9
1. Найти сумму четных делителей натурального числа.
2. Найти все равновеликие прямоугольные треугольники, катеты которых выражены натуральными числами a, b, а площадь равна S (a и b из интервала от 1 до 20, а площадь вводится с клавиатуры).
Вариант № 10.
1. Найти количество нечетных делителей натурального числа, больших К
(К вводится с клавиатуры).
2. Найти все натуральные числа a, b и с из интервала от 1 до 20, для которых выполняется равенство ab2=c2.
Вариант 11.
1. Найти натуральное число от 1 до 10 000 с максимальной суммой делителей.
2. Даны натуральные числа n и m. Получить все натуральные числа меньшие n, квадрат суммы цифр которых равен m.
Вариант 12.,13,14,15,16
1. Вычислить
2. Дано 100 вещественных чисел. Вычислить разность между максимальным и минимальным из них.
Дополнительное задание:
1-Опишите на русском языке или на одном из языков программирования алгоритм вычисления разности между средним арифметическим максимального и минимального значений элементов заданного целочисленного массива из 30 элементов и средним арифметическим всех элементов этого массива.
Исходные данные объявлены так, как показано ниже.
uses crt;
const n=30;
type massiv=array[1..n] of integer;
var a:massiv;
min,max,i,sum:integer;
sred1,sred2:real;
Begin
for i:=1 to n do
begin
write('a[',i,']= ');readln(a[i]);
end;
...
End.
2-Опишите на русском языке или на одном из языков программирования алгоритм подсчета суммы всех отрицательных элементов заданного целочисленного массива размером 30 элементов. Если отрицательных элементов нет, сообщите об этом.
Исходные данные объявлены так, как показано ниже.
const
N = 30;
var
a: array [1..N] of longint;
s, i:integer;
begin
for i:= 1 to N do
readln(a[i]);
...
end.
|
|
Типы сооружений для обработки осадков: Септиками называются сооружения, в которых одновременно происходят осветление сточной жидкости...
Автоматическое растормаживание колес: Тормозные устройства колес предназначены для уменьшения длины пробега и улучшения маневрирования ВС при...
Механическое удерживание земляных масс: Механическое удерживание земляных масс на склоне обеспечивают контрфорсными сооружениями различных конструкций...
Двойное оплодотворение у цветковых растений: Оплодотворение - это процесс слияния мужской и женской половых клеток с образованием зиготы...
© cyberpedia.su 2017-2024 - Не является автором материалов. Исключительное право сохранено за автором текста.
Если вы не хотите, чтобы данный материал был у нас на сайте, перейдите по ссылке: Нарушение авторских прав. Мы поможем в написании вашей работы!