ВТОРНИК, 16 Фев 2021 Программирование
Решить задачу: Даны три числа, вывести их в порядке возрастания. Используя условный оператор.
285
356
Ответы на вопрос:
Program DaNNuu;
uses crt;
const n=3;
var
a:array [1..n] of integer;
i,j,min,temp:integer;
begin
randomize;
{создание массива}
writeln('Элементы массива:');
for i:=1 to n do
begin
a[i]:=random(101)-50;
write (a[i]:5);
end;
{сортировка массива}
for i:=1 to n-1 do
begin
min:=i;
for j:=i+1 to n do
if a[min]>a[j] then
min:=j;
temp:=a[i];
a[i]:=a[min];
a[min]:=temp;
end;
writeln();
{вывод массива}
writeln('Результат сортировки:');
for i:=1 to n do
write(a[i]:5);
end.
Объяснение:
Clsm = 100while m < 999 f$ = str$(m) f$ = mid$(f$, 2) h1$ = mid$(f$, 1, 1) h2$ = mid$(f$, 2, 1) h3$ = mid$(f$, 3, 1) k = val(h1$) * val(h2$) * val(h3$) if k mod 2 = 0 then print h1$; "*"; h2$; "*"; h3$; "="; k end if m = m + 1wend
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
rytryt14.08.2022 13:50
-
MrLukz22821.01.2023 20:07
-
DashaHB1609.12.2020 22:11
-
GeorgeWashUSA04.05.2020 16:30
-
princhesnurss01.07.2021 13:10
-
kyrmaeva20061409.05.2020 18:48
-
57den1622.07.2021 22:21
-
2xui208.12.2020 22:15
-
Катюшкавасилек05.05.2023 10:56
-
vadkirkov27.07.2022 08:16
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.