Составьте блок-схему и напишите программу, которая отсортирует массив А(5) по возрастанию.

1

Ответы и объяснения

  • Kitsu
  • почетный грамотей
2012-11-22T20:13:51+04:00

var k,i,j:integer;

a:array[1..5]of integer;

begin

for i:=1 to 5 do begin

for j:=1 to 4 do begin

if a[j]>a[j+1] then begin

k:=a[j+1];

a[j+1]:=a[j];

a[j]:=k;

end;

end;

end;

end.