Написать программу нахождения суммы большего и меньшего из 3-х чисел.для "паскаль"

117

227

Посмотреть ответы 2

Ответы на вопрос:

milasuraeva

Информатика

4,8(75 оценок)

Var a,b,c,min,max,s: integer; begin write('ведите числo а '); readln(a); min: =a; max: =a; write('ведите числo b '); readln(b); if b< min then min: =b; if b> max then max: =b; write('ведите числo c '); readln(c); if c< min then min: =c; if c> max then max: =c; writeln('сумма min + max = ',min+max); end.