Напечатать наибольшие общие делители первой и второй пар чисел

@Gabdra · Регистрация: 23.12.2013

Author24 — интернет-сервис помощи студентам

Составить программу, которая для заданных 4 натуральных чисел напечатает наибольшие общие делители первой и второй пар чисел и сравнит их по величине. Тема процедуры и функции.

@Nickolay0512 · 02.05.2014, 18:59

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
var a,b,c,d,p1,p2: integer;
function gcd(m, n: integer): integer;
    var modulo: integer;
    begin
        modulo := m mod n;
        if modulo = 0 then
            gcd := n
        else
            gcd := gcd (n, modulo)
    end;
BEGIN
     writeln('Введите 4 числа:');
     readln(a,b,c,d);
     p1:=gcd(a,b);
     p2:=gcd(c,d);
     writeln('НОД для пары чисел ',a,', ',b,' = ',p1);
     writeln('НОД для пары чисел ',c,', ',d,' = ',p2);
     if p1>p2 then writeln('НОД первой пары больше НОД второй')
     else if p1=p2 then writeln('НОД первой пары равен НОД второй')
     else writeln('НОД первой пары меньше НОД второй');
     readln;
end.

Новые блоги и статьи Все статьи Все блоги /
Анализ и линтинг кода JavaScript: ESLint, Prettier и JSHint run.dev 26.04.2025 JavaScript прошёл долгий путь от простого языка для анимации веб-страниц до основы современной веб-разработки. С ростом сложности приложений, увеличением кодовых баз и масштабированием команд. . .	Паттерны в Python: Singleton, Factory и Observer py-thonny 26.04.2025 Паттерны проектирования — это проверенные временем решения типовых проблем разработки программного обеспечения. Их история берёт начало с книги "Приёмы объектно-ориентированного проектирования. . . .	Исключения в C#: Stack Overflow, Access Violation и Out of memory stackOverflow 26.04.2025 Исключения в C# — это не только механизм оповещения о проблемах, а целое искусство управления потоком выполнения программы в экстремальных ситуациях. Обычное исключение, например,. . .	Логирование в C# ASP.NET Core с помощью Serilog, ElasticSearch, Kibana stackOverflow 25.04.2025 Помните те времена, когда для анализа проблемы приходилось подключаться к серверу, искать нужный лог-файл среди десятков других и вручную фильтровать тысячи строк в поисках ошибки? К счастью, эти дни. . .	Структура "железный OnKeyUp" вместо антидребезга. Полностью асинхронный счётчик. Hrethgir 25.04.2025 Программа для симуляции схемы - Logisim Evolution В общем какое-то время отвлёкся, так было надо, теперь когда запилю это на verilog и FPGA , досоставлю заявку в ФИПС на полезную модель - не готов. . .
Автоматизация Amazon Web Services (AWS) с Boto3 в Python py-thonny 25.04.2025 Облачные вычисления стали неотъемлемой частью современной ИТ-инфраструктуры, а Amazon Web Services (AWS) занимает лидирующие позиции среди провайдеров облачных услуг. Управление многочисленными. . .	Apache Kafka vs RabbitMQ в микросервисной архитектуре ArchitectMsa 25.04.2025 Современная разработка ПО всё чаще склоняется к микросервисной архитектуре — подходу, при котором приложение разбивается на множество небольших, автономных сервисов. В этой распределённой среде. . .	Параллельное программирование с OpenMP в C++ NullReferenced 24.04.2025 Параллельное программирование — подход к созданию программ, когда одна задача разбивается на несколько подзадач, которые могут выполняться одновременно. Оно стало необходимым навыком для. . .	Цепочки методов в C# с Fluent API UnmanagedCoder 24.04.2025 Современное программирование — это не только решение функциональных задач, но и создание кода, который удобно поддерживать, расширять и читать. Цепочки методов и Fluent-синтаксис в C# стали мощным. . .	Мульти-тенантные БД с PostgreSQL Row Security Codd 23.04.2025 Современные облачные сервисы и бизнес-приложения всё чаще обслуживают множество клиентов в рамках единой программной инфраструктуры. Эта архитектурная модель, известная как мульти-тенантность, стала. . .

@Gabdra 1 / 1 / 2 Регистрация: 23.12.2013 Сообщений: 112

	Напечатать наибольшие общие делители первой и второй пар чисел 02.05.2014, 17:14. Показов 2142. Ответов 1 Метки нет (Все метки) Составить программу, которая для заданных 4 натуральных чисел напечатает наибольшие общие делители первой и второй пар чисел и сравнит их по величине. Тема процедуры и функции. 0

Опции темы

Напечатать наибольшие общие делители первой и второй пар чисел

Решение