Название сайта 1

Введите, пожалуйста, адрес электронной почты, указанный в параметрах вашей учётной записи. На этот адрес будет отправлено письмо, содержащее ваш Логин.

Новости

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

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

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

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

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

// Алгоритм Евклида нахождения НОД
// Уровень сложности: 0

function GCD(a,b: integer): integer;
begin
  while b<>0 do
  begin
    var c := a mod b;
    a := b;
    b := c;
  end;
  Result := a;
end;

begin
  var a,b: integer;
  writeln('Введите a,b: ');
  read(a,b);
  
  writeln('НОД = ',GCD(a,b));
end.