Составьте программу сортировки по возрастанию значений трех переменных A; B; C

Question

Информатика

Кирилка

24 сентября, 11:33

Составьте программу сортировки по возрастанию значений трех переменных A; B; C

+2

Ответы (1)

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

Белка · Answer 1

Var a, b, c:integer;

begin

readln (a, b, c);

if ((a
else if ((b
else if ((c
if ((a>c) and (c>b)) then writeln (c)

else if ((b>c) and (b
else if ((b>a) and (a>c)) then writeln (a);

if ((a>b) and (a>c)) then writeln (a)

else if ((b>c) and (b>a)) then writeln (b)

else if ((c>a) and (c>b)) then writeln (c);

end.