Примеры программ

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

В данном разделе содержатся примеры программ на PascalABC.NET от элементарных до сложных. Часть из них посвящена алгоритмам, реализованным на языке Паскаль, другая часть - особенностям языка и библиотек PascalABC.NET.

Примеры разбиты на следующие группы:

Особенности языка

В данном разделе приводятся примеры, иллюстрирующие особенности языка PascalABC.NET.

Стандартные модули В данном разделе рассматриваются примеры использования графических модулей, модулей школьных исполнителей Робот и Чертежник, студенческих учебных модулей Arrays и Collections. Раздел также пока находится в разработке.
Начинающим
(программы и алгоритмы)
Данный раздел можно прекомендовать для начального изучения языка. Здесь приводятся простейшие классические алгоритмы с использованием основных конструкций языка Паскаль. Материалы раздела могут быть использованы для подготовки к ЕГЭ по информатике, для самостоятельного изучения, а также в качестве справочника.
Программы и алгоритмы для студентов Данный раздел предназначен для студентов и реализуется силами студентов 1 курса ИТ. В этом разделе будут располагаться программы и алгоритмы, возникающие в курсе "Основы программирования" (ИТ, 1 курс)
Алгоритмы средней сложности Данный раздел находится в разработке.

 

Новости

Начата публикация глав книги Осипова А.В. «PascalABC.NET: Современное программирование». Обсуждение книги - на форуме.

04.01.19. На сайте появился новый раздел - Книги по PascalABС.NET.

30.08.18. Вышла версия 3.4.2. Реализованы расширенные свойства. Реализован новый модуль векторной графики WPFObjects.

17.06.18. Опубликован документ Массивы: алгоритмы против методов и операций

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

// Пузырьковая сортировка с флагом
// Уровень сложности: 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.