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

Question

Информатика

Теодорка

7 февраля, 09:04

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

+3

Ответы (1)

Знаете ответ?

Артема · 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.