Статистика
Всего в нашей базе более 4 327 663 вопросов и 6 445 976 ответов!

ПаскальАВС.

5-9 класс

Вводятся 3 числа,нужно ввести их
1)в порядке возрастания
2)в порядке убывания

Natalianovikov 21 мая 2014 г., 21:11:49 (9 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
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" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.