Задание 8 Вариант 3 Самостоятельная работа 4 ГДЗ Рабочая тетрадь Босова 11 класс (Информатика)

Решение #1

Изображение 8. Напишите программу. Упорядочьте массив C[1..N] по возрастанию. Проверьте работу программы на заданном массиве С = {63, 7.2, -4.5, 0, -10, 14, -310, 50, 11, -14,...
Приложенные файлы
Загрузка...

Рассмотрим вариант решения задания из учебника Босова, Босова, Аквилянов 11 класс, Бином:
8. Напишите программу. Упорядочьте массив C[1..N] по возрастанию. Проверьте работу программы на заданном массиве С = {63, 7.2, -4.5, 0, -10, 14, -310, 50, 11, -14, 5}.
Массив С, упорядоченный по возрастанию.
program s4_v3_8;
const
n = 11;
var
c: array[1..n] of real;
a: real;
i, j: integer;
begin
writeln('ввод массива');
//randomize;
for i := 1 to n do
//c[i] := random*20-10;
readln(c[i]);
// сортировка методом «пузырька»
for i := 1 to n - 1 do
for j := 1 to n - i do
if c[j] > c[j+1] then
begin
a := c[j];
c[j] := c[j+1];
c[j+1] := a
end;
for i := 1 to n do
write(c[i], ', ')
end.
Массив С, упорядоченный по возрастанию:
-310, -14, -10, -4.5, 0, 5, 7.2, 11, 14, 50, 63,
В программе предусмотрен (в комментариях) ввод массива через генератор случайных чисел. Можно воспользоваться им, для этого убрать // и закомментировать ввод с клавиатуры. Для изменения количества элементов измените n.
*Цитирирование задания со ссылкой на учебник производится исключительно в учебных целях для лучшего понимания разбора решения задания.
*размещая тексты в комментариях ниже, вы автоматически соглашаетесь с пользовательским соглашением

Похожие решебники