Процедуры и функции в Паскаль. Как объявлять и использовать

Задача № 3 главы 14

Напишите процедуру, которая принимает переменную целого типа по ссылке, просит пользователя ввести значение в консоли и инициализирует переменную этим значением (убедитесь, что в теле программы значение изменилось).

Задача № 2

Напишите процедуру, которая выводит на экран сумму трёх целых чисел.

program pascal_procedure_amount;

procedure sum( s1 , s2  , s3  : integer ); 
begin // начало тела процедуры
  write( s1 + s2 + s3 ) ;
end; // конец тела процедуры

begin  // начало тела основной программы
  sum( 43 , 54 , 32 );// вызов прoцедуры 
end. // конец тела основной программы