Регистрация
лол1635
24.10.2020 22:37
Информатика
Есть ответ 👍

Запишите полный текст программы и выполните для массива a= 0,1,9,2,4,3,6,5 сортировка по убыванию босова 72 стр 9 класс

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

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

Апельсинка102
Апельсинка102
4,5(29 оценок)

const n=8;

var i,j,v,max,k: integer;

a: array [1..n] of integer = (0,1,9,2,4,3,6,5);

begin

write ('       исходный массив: ');

for i: =1 to n do write(a[i],'   ');

writeln;

for i: =1 to n-1 do

begin

max: =i;

for j: =i+1 to n do

if a[j] > a[max] then max: =j;

v: =a[i];

a[i]: =a[max];

a[max]: =v

end;

write ('преобразованный массив: ');

for i: =1 to n do write(a[i],'   ');

end.

felikstatenko2
felikstatenko2
4,4(77 оценок)

const n = 8;

var a: array [1..n] of integer: =(0, 1, 9, 2, 4, 3, 6, 5);

i, j, imax, x: integer;

begin

  for i: =1 to n-1 do

  begin

    imax: =i;

    for j: =i+1 to n do if a[j]> a[imax] then imax: =j;

    x: =a[i];

    a[i]: =a[imax];

    a[imax]: =x;

  end;

 

  write('отсортированный по убыванию массив: ');

  for i: =1 to n do

    write(a[i]+' ');

end.

sofa372
sofa372
4,7(17 оценок)

росписан но я хз что за точки


Написать программу в пайтон для решения следующего задания , присылайте проверенную и рабочую програ

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