История изменений

Исправление nvl, 13.10.17 22:23 (текущая версия) :

Переведите на русский эту фразу: «Паскаль поддерживает парадигму не записевого, а так называемого рекордного программирования.»

в Паскале нет ни функций..

function max(num1, num2: integer): integer;

var
   result: integer;

begin
   if (num1 > num2) then
      result := num1
   
   else
      result := num2;
   max := result;
end;

.. ни структур..

     Struct=record
                     Items:integer;
                     Count:byte;
     end;

Исходная версия nvl, 13.10.17 22:22:

в Паскале нет ни функций..

function max(num1, num2: integer): integer;

var
   result: integer;

begin
   if (num1 > num2) then
      result := num1
   
   else
      result := num2;
   max := result;
end;

.. ни структур..

     Struct=record
                     Items:integer;;
                     Count:byte;
     end;