Функция минимума. Разработанные процедуры и функции поместить в отдельном модуле, который использовать в основной программе(Delphi

[zia]

Даны числа a,b. Получить u=min(a,b), v=min(ab,a+b), min(u+v^2,3.14)

[p51x]

И чо? Вы не можете найти минимум из двух чисел?

[zia]

ну как тут функцию построить

[p51x]

Как написано: на входе два аргумента, на выходе минимум из них

[Человек_Борща]

Это не форум готовых ответов и халявных решений, показывайте что сами написали.

[Stilet]

ну как тут функцию построить

Очень просто:

function min(q,w:variant):variant;begin if q>w then result:=w else result:=q;end;

А потом скармливай ей значения по заданию.