Как найти минимальное из чисел?
Проще всего задача поиска минимального из трех, четырех и более чисел, решается перегрузкой функции нахождения минимума из двух.
Аналогичные функции можно написать для поиска максимального из чисел. Для этого достаточно сменить знак сравнения в функции с двумя аргументами(в первой из рассмотренных).
Для реализации сначала нужно написать функцию, которая находит минимальное из двух чисел.
Функция определения минимального из двух чисел
Теперь у нас есть код, который возвращает наименьшее из двух чисел. Для того, чтобы расширить количество аргументов до трех, достаточно написать ещё одну функцию, которая будет дважды вызывать предыдущую.
Функция поиска наименьшего из трех чисел
А что если нужно сравнить четыре, пять и больше чисел, и найти минимальное из них?
Без проблем, мы можем писать столько перегруженных функций, сколько нам нужно.
Минимум из четырех чисел
Эта функция использует вызов двух предыдущих.
Программа для поиска и вывода минимальных чисел
все приведенные выше функции должны быть размещены в том же порядке над телом основной программы
В зависимости от количества аргументов, компилятор выбирает какую из функций вызывать.
Если предполагается сравнивать много чисел, то лучше всего представить их в виде массива, и искать минимальный или максимальный элемент в массиве.
Как сравнить 3 числа в паскале
Длинная арифметика. Сравнение двух и трех длинных чисел.
Сегодня я публикую ещё один исходник программы на Pascal. Итак, сегодня я помогу вам составить программу в паскале, задача которой — сравнение двух больших чисел (0 1000 ,0 1000 ), т.е. эти числа не помещаются ни в integer, longint и int64. Просмотреть исходный код, а также скачать уже готовый исходник рабочей программы, Вы можете далее.
При решении данной задачи становится очевидно решение и для сравнения трех больших чисел. Достаточно в процедуре inimatr изменить условие.
Скачать исходник программы сравнения двух чисел: sravnenie.pas
Скачать исходник программы сравнения трёх чисел: sravnenie.pas
Кстати, а Вы, дорогие читатели, не знаете, какие выбрать натяжные потолки? А то в современном мире столько выбора стройматериалов, что и задумываешься над такими, казалось бы глупыми вопросами. Да. Ремонт — песня долгая.
Найти максимальное число из трех
Определить какое из трех введенных пользователем чисел максимальное и вывести его на экран.
Пусть числа, которые вводит пользователь, присваиваются переменным n1 , n2 , n3 . Введем четвертую переменную max , в которую по ходу выполнения кода будет помещено найденное максимальное значение. Тогда алгоритм решения задачи можно свести к следующему:
- Сравнить первое и второе число ( n1 и n2 ). Переменной max присвоить значение переменной, содержащей большее значение.
- Сравнить значение переменной max с третьим числом ( n3 ). Если значение n3 окажется больше, чем max , то присвоить max значение третьего числа. Если же значение max окажется больше, то ничего не делать.
Программа на языке Паскаль:
Другой способ решения задачи — сразу предположить, что первая переменная содержит максимальное число, и присвоить его переменной max . Далее, сравнивая значение max со значениями двух других переменных, будем менять max только в том случае, если второе или третье числа больше того значения, которое содержится в max .
Алгоритм сравнения трех чисел
Нужно составить программу для нахождения наибольшего общего делителя трех натуральных чисел используя алгоритм Евклида
Нужно составить программу для нахождения наибольшего общего делителя трех натуральных чисел.
Написать алгоритм нахождения меньшего из трех чисел
помогите пожалуйста. никак не могу сделать в Turbo Pascale. Написать алгоритм нахождения.
Составить алгоритм нахождения суммы большего и меньшего из трёх чисел
Составить алгоритм нахождения суммы большего и меньшего из трёх чисел
Есть а, б и с.
Проверяем на равенство а, б и с. Это три сравнения, как максимум. Если какие-нибудь из них равны, то дальше все решается за одну преверку.
Если все неравны, то дальше, если а больше, чем б, и с больше, чем а, то все понятно.
Если а больше б, а с не больше а, то сравниваем еще с с б и тоже все понятно.
Если а не больше б, то абсолютно тоже самое получается, только на месте большего а у нас теперь б.
та же байда для остальных чисел, только буквы разные.
Получается, в самом "удачном" случае 6 проверок.
Это первое, что мне в голову пришло. Думаю, есть и лучше решение.
Сообщение было отмечено Памирыч как решение
Pascal: как выбрать большее (меньшее) число из 3-х.
Я в паскале вообще не разбираюсь, помогите мне составить её:
дано мне 3 числа: 37; -3; 0,1.
как найти самое большее и (в другой задаче) наименьшее из них.
а это, то что я составил, тока оно не работает:
program nahogdenie;
uses crt;
var a,b,c,s:real;
if (a>b) and (a>c) then a:=s;
if (b>a) and (b>c) then b:=s;
if (c>a) and (c>b) then c:=s;
read (s);
write (‘s=’);
repeat until keypressed;
end.
[COLOR=Red]Для оформления кода используй тэги [cоde] Текст Программы [/code]. [/COLOR]