найти сумму большего и меньшего из трех чисел на алгоритмическом языке

var a,b,c,max,min:integer; begin    read(a,b,c);    max:=c;    min:=c;    if min>a then min:=a else if min>b then min:=b;    if max<a then max:=a else if max<b then max:=b;    write(min,max); end.