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

Question

Информатика

Константиныч

4 апреля, 01:06

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

+4

Ответы (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.