ПаскальАВС.
5-9 класс
|
Вводятся 3 числа,нужно ввести их
1)в порядке возрастания
2)в порядке убывания
Natalianovikov
21 мая 2014 г., 21:11:49 (9 лет назад)
Vampir4808
21 мая 2014 г., 23:55:01 (9 лет назад)
var m:array [1..3] of real;
i,j:longint;
k:real;
begin
read(m[1],m[2],m[3]);
for i:=1 to 3 do
for j:=3 downto i+1 do
if m[i]>m[j] then
begin k:=m[i]; m[i]:=m[j]; m[j]:=k; end;
writeln(m[1],' ',m[2],' ',m[3]);
end.
2.
Ответить
Другие вопросы из категории
Создайте главную
страницу, в которой осуществите переход к созданным ранее страницам.
расположите носители в порядке увеличения их емкости, исходя из их максимально возможных емкостей:
f) CD, b) Blu-ray, c) HDD, d) DVD.
срочно нужно сегодня,пожалуйста помогите!!!
Читайте также
Вы находитесь на странице вопроса "ПаскальАВС.", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.