сервис вопросов и ответовДано 3 числа, расположить их в порядке возрастания(в паскале)
10-11 класс|
|
Ekaterina300120
19 марта 2017 г., 11:36:03 (7 лет назад)
Kotelnikova9915
19 марта 2017 г., 13:27:27 (7 лет назад)
Uses CRT;
Var a, n: longint; d, z, v, t: integer;
E: array[1..10] of integer;
Begin
ClrScr;
write('Введите n-значное число '); readln(n);
a:=1; z:=1;
while ((n div a) mod 10)>=1 do
begin E[z]:=(n div a) mod 10; a:=a*10; z:=z+1 end;
for d:=1 to z-2 do
for v:=1 to z-2 do
if E[v]>E[v+1] then
begin t:=E[v]; E[v]:=E[v+1]; E[v+1]:=t; end;
for d:=1 to z-1 do write(E[d]);
End.
Seka1981
19 марта 2017 г., 15:36:10 (7 лет назад)
Надо от самого маленького числа начинать до самого большого! если ты не понимаешь в паскале обратись к другим сайтам
Ответить
Другие вопросы из категории
Построить алгоритм и написать программу на языке Basic. Задана вещественная матрица. Напишите программу вычисления величины L=max-|min|, где max
- целая часть максимального элемента, min - целая часть минимального элемента матрицы A.
Алгоритм использует два одномерных массива: а (3, 6, 5, 2, 1, 4) и b (3, 1, 5, 6, 2, 4); формирует и выводит координаты (I, j) 100 точек. Сколько этих
точек попадает внутрь круга радиусом R=4 с центром в начале координат ?
I:=3; j:=3
Нц 100 раз
I:=a [I]; j:=b[j]
Вывод I, j
кц
ОТВЕТЫ 1) 25 2) 42 3)41 4) 24 5)57
Читайте также
Помогите пожалуйста! Задание: 1) Укажите через запятую в порядке возрастания все десятичные числа, не превосходящие 25, запись которых в
троичной системе счисления оканчивается на 21?
2) укажите через запятую в порядке возрастания все десятичные числа, не превосходящие 45, запись кторых в двоичной системе счисления оканчивается на 1010?
3) Укажите сколько всего раз встретится цифра 3 в записи чисел 13, 14,15,...,23 в системе счисления с основанием 4?
Даны действительные числа x, y. Вывести на экран то из них, которое меньше.
Даны два символа (латинские буквы). Вывести их на экран в порядке возрастания по алфавиту.
№1. Укажите через запятую в порядке возрастания все основания систем счисления, в которых запись числа 11 оканчивается на 1. №2.
Укажите через запятую в порядке возрастания все основания систем счисления, в которых запись числа 19 оканчивается на 4.
№3. Укажите через запятую в порядке возрастания все основания систем счисления, в которых запись числа 27 оканчивается на 3.
Помогите пожалуйста написать программу)))
Даны три числа, вывести их на экран в порядке возрастания.
Вы находитесь на странице вопроса "Дано 3 числа, расположить их в порядке возрастания(в паскале)", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.