Kotorkovsciy
@Kotorkovsciy

Как в паскале сортировать простые числа в массиве?

program p1;

uses crt;

type
  massive = array of integer;

var
  n: byte;
  i: byte;
  a: massive;

begin
  clrscr;
  write('Введите размер массива:   '); read(n);
  write('Массив: '); 
  setlength(a, n);
  randomize;
  for i := low(a) to high(a) do        
  begin
    a[i] := random(n);        
    write(a[i]:4);
  end;
end.
  • Вопрос задан
  • 57 просмотров
Пригласить эксперта
Ответы на вопрос 1
HemulGM
@HemulGM
Delphi Developer, сис. админ
Десятки и сотни алгоритмов в сети

Я, например, сортирую так
var Items := RandomRange(10);
print(Items);
TArrayHelp.Sort(Items);
print(Items);


[0, 3, 86, 20, 27, 67, 31, 16, 37, 42]
[0, 3, 16, 20, 27, 31, 37, 42, 67, 86]


Но у тебя так не сработает, потому что учить нужно не старые языки, а новые (это Delphi).
А в твоём случае вообще нужно алгоритм изучать, а не функции вызывать
Ответ написан
Комментировать
Ваш ответ на вопрос

Войдите, чтобы написать ответ

Войти через центр авторизации
Похожие вопросы