Решить с паскаля: 1. заполнить массив из 10 элементов случайными числами в интервале [0..100] и отсортировать его по последней цифре. 2. заполнить массив из 10 элементов случайными числами в интервале [0..100] и отсортировать первую половину по возрастанию, а вторую- по убыванию. здесь решать лучше методом выбора.

261

317

Посмотреть ответы 3

Ответы на вопрос:

77Джи77

Информатика

4,6(80 оценок)

Var i,j: integer; mas: array [1..10] of integer; begin randomize; for i: = 1 to 10 do mas[i]: =random(101); for j: =1 to 10-1 do for i: =1 to 10-j do if mas[i] mod 10 > mas[i+1] mod 10 then swap(mas[i],mas[i+1]); for i: =1 to 10 do writeln(mas[i]); end.2)var a: array[1..10] of integer; i,j: integer; begin randomize; for i: =1 to 10 do a[ i]: =random(101); for i: =1 to 4 do for j: =i+1 to 5 do if a[ i] > a[ j] then swap(a[i],a[j]); for i: =5 to 9 do for j: =i+1 to 10 do if a[ i] < a[ j] thenswap(a[i],a[j]); ; for i: =1 to 10 do write(a[ i],' '); end.

непр1

Информатика

4,7(1 оценок)

2) сортирую не методом выбора, а пузырьковым методом, т.к. мне неизвестна формулировка "метод выбора" program z1; var mas: array[1..10] of integer; m,n,temp: integer; begin randomize; for i: =1 to 10 do begin mas[i]: =random(100); end; for i: =1 to 4 do if mas[i]> mas[i+1] then begin temp: =mas[i+1]; mas[i+1]: =mas[i]; mas[i]: =temp; end; for i: =6 to 9 do if mas[i]< mas[i+1] then begin temp: =mas[i+1]; mas[i+1]: =mas[i]; mas[i]: =temp; end; end. если нужен еще и вывод на экран - то дописываете перед end. следующее: for i: =1 to 10 do writeln(mas[i]) насчет первого. мне непонятна формулировка "отсортировать по последней цифре"

vampirmixa

Информатика

4,6(71 оценок)

var

x : integer;

begin

x: =4321;

writeln mod 100) div 10)*1000+((x mod 1000) div 100) *100 + ( x div 1000)*10 + x mod 10)

end.

Реши свою проблему, спроси otvet5GPT

Быстро
Мгновенный ответ на твой вопрос
Точно
Бот обладает знаниями во всех сферах
Бесплатно
Задай вопрос и получи ответ бесплатно

Задай свой вопрос

Популярно: Информатика

Есть вопросы?

Как otvet5GPT работает?

otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
Сколько это стоит?

Проект находиться на стадии тестирования и все услуги бесплатны.
Могу ли я использовать otvet5GPT в школе?

Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
В чем отличия от ChatGPT?

otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.