Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.63/8: Рейтинг темы: голосов - 8, средняя оценка - 4.63
0 / 0 / 0
Регистрация: 27.10.2011
Сообщений: 15
1

Упорядочите числа в порядке неубывания

19.11.2011, 16:08. Показов 1609. Ответов 5
Метки нет (Все метки)

Дано три числа, записанный в отдельных строках. Упорядочите их в порядке неубывания. Программа должна считывать три числа a, b, c, затем программа должна менять их значения так, чтобы стали выполнены условия a <= b <= c, затем программа выводит тройку a, b, c.
0

Помощь в написании контрольных, курсовых и дипломных работ здесь.

Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
19.11.2011, 16:08
Ответы с готовыми решениями:

Упорядочить все числа n от 1 до m в порядке неубывания значений d(n)
Пусть для целого n&gt;0 функция d(n) равна количеству делителей числа n. Дано m&gt;0. Упорядочить все...

Упорядочить все числа n от 1 до m в порядке неубывания значений d(n)
Помогите составить программу: Пусть для целого n&gt;0 функция d(n) равна количеству делителей числа...

Заданы две последовательности целых чисел, в первой из которых числа идут в порядке неубывания
Заданы две последовательности целых чисел, в первой из которых числа идут в порядке неубывания:...

Задача со стеками. В первый стек поместить четные числа в порядке неубывания, во второй стек поместить нечетные
Даны четыре стека.Два первых стека пустые,а в двух других находятся натуральные числа.В первый...

5
Почетный модератор
7963 / 3934 / 2464
Регистрация: 30.10.2011
Сообщений: 5,377
19.11.2011, 16:11 2
Милечка, что-то условие не совсем понятно...
1) с чем работаем: с массивом, строкой или просто значениями
2) менять значения переменных или менять их местами? и если менять значения, то по какому правилу?
0
0 / 0 / 0
Регистрация: 27.10.2011
Сообщений: 15
19.11.2011, 16:19  [ТС] 3
не знаю, учитель так задал. вообщем нужно в порядке возростания поставить эти числа. А массивы мы не проходили еще =( Попробуйте решить как знаете
0
Почетный модератор
7963 / 3934 / 2464
Регистрация: 30.10.2011
Сообщений: 5,377
19.11.2011, 16:35 4
А процедуры вы уже изучали?
0
0 / 0 / 0
Регистрация: 27.10.2011
Сообщений: 15
19.11.2011, 16:43  [ТС] 5
да. Я думаю с if ами решать надо. Последняя тема эта была
0
Почетный модератор
7963 / 3934 / 2464
Регистрация: 30.10.2011
Сообщений: 5,377
19.11.2011, 17:07 6
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Если с процедурами, то так
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
uses crt;
var a,b,c: integer;
 
Procedure Obmen (var x,y: integer);
var z: integer;
begin
z:=x;
x:=y;
y:=z;
end;
 
begin
write('a=');
readln(a);
write('b=');
readln(b);
write('c=');
readln(c);
if a>b then Obmen (a,b);
if b>c then Obmen (b,c);
if a>b then Obmen (a,b);
writeln(a,' ',b,' ',c);
end.
1
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
19.11.2011, 17:07

Упорядочить массив в порядке неубывания
при вводе m&gt;0 выдает ошибку 201(((((( uses crt; function d(n:integer):integer; var i:integer;...

Упорядочить массив в порядке неубывания
Помогите пожалуйста с заданием(( Дан массив a: array of integer. Упорядочить элементы массива а...

Переставить строки матрицы в порядке неубывания
Помогите с заданием(((((( Дана действительная матрица размером M*N. Пусть для каждой строки...

Упорядочить три числа в порядке неубывания
Помогите пожалуйста с двумя задачками на FPC: 1)Дано три числа. Упорядочите их в порядке...

Упорядочить все числа n от 1 до m в порядке неубывания значений s(n).
Пусть для целого n&gt;0 функция s(n) равна сумме делителей числа n.Дано m&gt;0.Упорядочить все числа n от...

Даны два целых числа, вывести их в порядке неубывания
Даны два целых числа. Вывести их в порядке неубывания. что не правильно var a,b:real; begin...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
6
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.