Главная /
Решение олимпиадных задач по информатике /
Найдите ошибки в программе, реализующей алгоритм сортировки одномерного массива "Пузырьком", фрагмент которой приведен ниже: … for j:=2 to n do for i:=1 to j do if x[i]>x[i+1] then begin y:=x[i]; x[i]:= x[i+1]; x[i+1]:=y; end; …
Найдите ошибки в программе, реализующей алгоритм сортировки одномерного массива "Пузырьком", фрагмент которой приведен ниже:
Правильный ответ:
неверно:
for j:=2 to n do. Верно: for j:=n downto 2 do
неверно:
for i:=1 to j do. Верно: for i:=1 to j-1 do
Неверно
y:=x[i]; x[i]:= x[i+1]; x[i+1]:=y; Верно: x[i]:= x[i+1]; y:=x[i]; x[i+1]:=y
в программе нет ошибок
Сложность вопроса
65
Сложность курса: Решение олимпиадных задач по информатике
77
Оценить вопрос
Комментарии:
Аноним
Большое спасибо за подсказками по intiut'у.
17 окт 2019
Аноним
Благодарю за подсказками по интуиту.
22 июн 2019
Другие ответы на вопросы из темы программирование интуит.
- # Арифметическое выражение для вычисления площади треугольника на Паскале:
- # Простое число - это…
- # Признак пересечения одного выпуклого многоугольника с другим:
- # В результате выполнения программы на Паскале, фрагмент которой приведен ниже, произойдет выборка элементов из исходного массива, соответствующая такому основному типу комбинаторных групп: ... for i:=1 to n-1 do for j:=i+1 to n do writeln (A[i], A[j]); …
-
#
Найдите ошибки в приведенной ниже программе на Паскале, которая выполняет перевод числа a из
![math]()
-ричной системы счисления (b<10) в 10-тичную:
var a: string;
b, i, st, n, s, x, k:integer;
begin
readln (a); readln(b); n:=length(a); s:=0;
for i:=1 to n do
begin
val (copy(a,i,1),x,k); s:=s+x*st; st:=st*b;
end;
writeln (s);
end.
-ричной системы счисления (b<10) в 10-тичную:
var a: string;
b, i, st, n, s, x, k:integer;
begin
readln (a); readln(b); n:=length(a); s:=0;
for i:=1 to n do
begin
val (copy(a,i,1),x,k); s:=s+x*st; st:=st*b;
end;
writeln (s);
end.