Из трех данных чисел выбрать наименьшее и наибольшее. 6. Перераспределить значения переменных X и Y так, чтобы в X оказалось меньшее из этих значений, а в Y — большее.- Pascal(Паскаль)

var
  a, b, c, max: integer;

begin
  read(a, b, c);
  if a > b then
    max := a
  else
    max := b;
  if max > c then
    write(max)
  else
    write(c);

end.

Похожие записи/страницы:

Leave a Comment

96 − 88 =