Скриншоты

Просмотров: 114956

Общий вид

Окно вывода Сообщения об ошибках Запуск нескольких приложений одновременно Отладчик

Средства Intellisense

Подсказка по точке Подсказка по параметрам Всплывающая подсказка по имени Создание подсказки по имени

Проверяемые задания

Создание шаблона задания Решение задач для электронного задачника Решение задач для исполнителя Робот Решение задач для исполнителя Чертежник

Новости

19.01.17. Добавлена операция безопасного среза: a?[-1:5:2]

29.08.16. Вышла версия 3.2. Реализован оператор yield.

12.02.16. Вышла версия 3.1. Добавлены кортежи в стиле (a,b) и кортежное присваивание (a,b) := (b,a)

31.12.15. Версия 3.0.0.1128. Реализованы обобщенные методы расширения для операций

Случайная программа

// Пузырьковая сортировка с флагом
// Уровень сложности: 1
procedure BubbleSort(a: array of integer);
begin
  var i := a.Length - 1;
  var q: boolean;
  repeat
    q := true;
    for var j := 0 to i - 1 do
      if a[j + 1] < a[j] then
      begin
        Swap(a[j + 1], a[j]);
        q := false;
      end;
    i -= 1;
  until q;
end;

const N = 10;

begin
  var a := ArrRandom(N);
  writeln('Исходный массив: ');
  a.Println;
  BubbleSort(a);
  writeln('Отсортированный массив: ');
  a.Println;
end.