Ввести с клавиатуры три числа, и вывести их в порядке убывания.

Question

Ввести с клавиатуры три числа, и вывести их в порядке убывания.

Comments

на java

Answer 1

Самое простое, чтоб без заморочек, занести в массив и отсортировать его
var
  a:array[1..3]of real;
  i,j:integer;
  p:real;
begin
for i:=1 to 3 do
  begin
  write('Введите число: ');
  readln(a[i]);
  end;
for i:=1 to 3 do
  for j:=1 to 3 do
      if a[j]        begin
        p:=a[i];
        a[i]:=a[j];
        a[j]:=p;
        end;
for i:=1 to 3 do write(a[i],' ')
end.

Comments

хм)(

---

мне в java нада а не на паскале

---

Раньше предупреждать надо было))

---

Ответ принят потому что решение было дано раньше, чем добавлен комментарий