PureBasic - форум

Информация о пользователе

Привет, Гость! Войдите или зарегистрируйтесь.


Вы здесь » PureBasic - форум » Вопросы по PureBasic » Наименьшее число из трёх


Наименьшее число из трёх

Сообщений 1 страница 5 из 5

1

Добрый день!

Столкнулся с простой проблемой, но не могу найти, нужна функция выбора минимального числа из трёх, типа как МИН(а,в,с)

0

2

kirillovss написал(а):

Столкнулся с простой проблемой, но не могу найти, нужна функция выбора минимального числа из трёх, типа как МИН(а,в,с)

ОПА! Не уж то и на Пурике началось? Надеюсь, что это не задание преподавателя и всё ещё не так безнадежно?

Код:
Procedure FunMin (A,B,C)
Min=A
If B<Min:Min=B :EndIf
If C<Min:Min=C :EndIf
ProcedureReturn Min
EndProcedure
; Проверка
Debug  FunMin (5,-100,1)

Умышленно не объявляю типы переменных - по умолчанию в 5-й версии integer, но думаю уж тут то проблемы не будет?

0

3

Следующий вопрос наверно будет:
Найти сумму всех натуральных чисел диагонали матрицы 5x5... :mybb:

Отредактировано mirashic (25.05.2011 16:36:21)

0

4

mirashic написал(а):

Найти сумму всех натуральных чисел диагонали матрицы 5x5...

http://purebasic.mybb.ru/viewforum.php?id=17

0

5

:D жжёте

0


Вы здесь » PureBasic - форум » Вопросы по PureBasic » Наименьшее число из трёх