Напишите ФУНКЦИЮ, которая вычисляет максимальное из трех чисел

Напишите ФУНКЦИЮ, которая вычисляет максимальное из трех чисел
Гость
Ответ(ы) на вопрос:
Гость
Function Max(a,b : Integer) : Integer; Begin   If a>=b then Max:=a else Max:=b; end; Function Max3(a,b,c : Integer) : Integer; Begin   Max3:=Max(Max(a,b),c); end;
Не нашли ответ?
Ответить на вопрос
Похожие вопросы