Форум программистов, компьютерный форум, киберфорум
Наши страницы

Pascal ABC

Войти
Регистрация
Восстановить пароль
 
Альбина321
0 / 0 / 0
Регистрация: 26.11.2014
Сообщений: 21
#1

Вывести на экран наибольший делитель натурального числа N, меньшего заданного натурального M - Pascal ABC

26.11.2014, 19:10. Просмотров 430. Ответов 1
Метки нет (Все метки)

Помогите пожалуйста решить задачу:
Составьте программу вывода на экран наибольшего делителя натурального числа N, меньшего заданного натурального M.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
26.11.2014, 19:10
Я подобрал для вас темы с готовыми решениями и ответами на вопрос Вывести на экран наибольший делитель натурального числа N, меньшего заданного натурального M (Pascal ABC):

Найдите наибольший общий делитель (НОД) одномерного масива натурального числа A[N]. - Pascal ABC
Найдите наибольший общий делитель (НОД) одномерного масива натурального числа A.

Вывести на экран порядковый номер наименьшей цифры заданного натурального числа - Pascal ABC
составьте программу, выводящую на экран порядковый номер наименьшей цифры натурального числа К. Работа в Паскале АВС. Помогите,...

Представление натурального числа в виде суммы ряда относительно заданного натурального основания - Pascal ABC
Представление натурального числа в виде суммы ряда относительно заданного натурального основания (перевод из десятичной СС в заданную)....

Представление натурального числа в виде суммы ряда относительно заданного натурального основания - Pascal ABC
Представление натурального числа в виде суммы ряда относительно заданного натурального основания?

Найти и вывести на экран наибольший нетривиальный делитель числа - Pascal ABC
Пользователь вводит с клавиатуры натуральное число, найти и вывести на экран наибольший нетривиальный (т.е. не равный введённому числу)...

Рекурсия: вывести все нечётные цифры заданного натурального числа в порядке их следования - Pascal ABC
Выдать все нечётные цифры заданного натурального числа в порядке их следования (слева направо).

1
APALoff
1637 / 1066 / 470
Регистрация: 03.07.2013
Сообщений: 4,507
27.11.2014, 10:41 #2
Pascal
1
2
3
4
5
6
Function Divid(N,M : Longint) : Longint;
Begin
  If (M>0) then
    If (N mod (M-1))=0 then Divid:=M-1 else Divid:=Divid(N,M-1)
  else Divid:=0;
end;
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
27.11.2014, 10:41
Привет! Вот еще темы с ответами:

Даны три числа. С помощью функции, определяющей первую цифру натурального числа вывести на экран наименьшую из цифр - Pascal ABC
Помогите решить. 7. Даны три числа. С помощью функции, определяющей первую цифру натурального числа вывести на экран наименьшую из...

Для натурального числа “k” вывести на экран дисплея фразу “В классе k учеников” - Pascal ABC
Для натурального числа “k” вывести на экран дисплея фразу “В классе k учеников”, согласовав окончание слова “ученик” с числом “k” (ученик,...

Вывести на экран все пары дружественных чисел, которые не превышают заданного натурального числа - Pascal
Два натуральных числа называются дружественными если каждое из них равно сумме всех делителей другого за исключением его самого. Вывести на...

Составить функцию для нахождения наименьшего нечетного натурального делителя k (k≠1) любого заданного натурального числа n - Pascal
Составить функцию для нахождения наименьшего нечетного натурального делителя k (k≠1) любого заданного натурального числа n. И если можно...


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru