Регистрация
Murew
28.08.2020 08:52
Информатика
Есть ответ 👍

Спаскалем кто знает сортировку const m = 100000; var arr: array[1..256] of longint; k,s,j,i: longint; begin randomize; for i : = 1 to m do begin k : = random(256); k: = k+1; arr[k] : = arr[k]+1; end; for i: = 1 to 256 do begin writeln ('массив ',i,' - ',arr[i]: 4) end; for i : = 1 to 256 do for j : = 1 to m-i do if arr[j] > arr[j+1] then {тут ошибка} begin s : = arr[j]; arr[j] : = arr[j+1]; arr[j+1] : = s end; write ('отсортированный массив: '); for i : = 1 to 256 do write (arr[i]: 4); end.

279
455
Посмотреть ответы 2

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

MCREW
MCREW
4,4(47 оценок)
Заменить строку во вложенном цикле  for j : = 1 to m-i do   на строку   for j: =1 to 256-i dom = 100000 - поэтому выход за границы массива.
vitalyrtss
vitalyrtss
4,7(54 оценок)
А=y+(x/(y^2+abc(x^2/(y+(x^3/3) вроде так)

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