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

Question

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

Comments

программа годится? как для паскаля

---

или с++

Answer 1

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    write(min,max);
 end.