9класс

Страница 101-107 §2.4 номер 5, ГДЗ по информатике за 9 класс к учебнику Босовой

Запись вспомогательных алгоритмов на языке Паскаль. Страница 101-107 §2.4 номер 5

страницы 101-107 §2.4 номер 5 учебнику по информатике 9 класс Босова

program z_5;

var

  a, b, c: integer;

procedure swap(var x, y: integer);

var

  m: integer;

begin

  m := x;

  x := y;

  y := m

end;

begin

  writeln('Введите три числа через пробел>>');

  read(a, b, c);

  if a > b then swap(a, b);

  if a > c then swap(a, c);

  if b > c then swap(b, c);

  writeln(a, ' ', b, ' ', c);

end.

Сообщить об ошибке
Закрыть