Дистанционная подготовка: Тусики тусики
Тусики тусики
от Даниил Рагутский - Пятница 22 Март 2019, 09:09
112317. Сортировка 
  var
a:array [1..10000] of integer;
n,i,j,k,t:integer;
begin
readln(n);
for i:=1 to n do read(a[i]);
j:=n;
repeat
k:=j;
j:=0;
for i:=1 to k-1 do
if a[i+1]
Re: Тусики тусики
от Даниил Рагутский - Пятница 22 Март 2019, 09:09
  if a[i+1]
Re: Тусики тусики
от Даниил Мордовин - Пятница 22 Март 2019, 09:10
  тр
Re: Тусики тусики
от Даниил Рагутский - Пятница 22 Март 2019, 09:10
  норм прога?
if a[i+1]