Напиши программу Напишите функцию, которая вычисляет сразу максимальное и минимальное из трёх чисел. (Используйте изменяемые параметры.) Паскаль Очень нужно.

Объяснение:

function min(a,b,c:integer);

begin

if(a<b) and (a<c) then min:=a

else if (b<a0 and (b<c) then min:=b

else min:=c;

end;

function max(a,b,c:integer): integer;

begin

if (a>b) and (a>c) then max:=a

else if (b>a) and (b>c) then max:=b

else max:=c;

end;

var a,b,c:integer;

begin

readln(a,b,c);

writeln('Минимальное значение= ',min(a,b,c));

writeln('Максимальное значение= ',max(a,b,c));

end.

(3+3·3): 3=4

(3·3+3): 3=4

================

3+3–(3: 3)=5

(3+3): 3+3=5

================

3+3+(3–3)=6

3-3+3+3=6

3·3: 3+3=6

(3+3): 3·3=6

================

3: 3+3+3=7

3+3: 3+3=7

================

3·3–3: 3=8

================

3·3·3: 3=9

3: 3·3·3=9

3·3+3-3=9

3+3·3-3=9

================

3: 3+3·3=10

3·3+3: 3=10

восемь бит - как раз 256 ячеек