Урок 14 задача 1

Урок 14 задача 1

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

program project1;
var num1,num2,num3:integer;

function sum(num1,num2,num3:integer):integer;
begin
  result:=num1+num2+num3;
end;

begin
   write('Введите первое число: '); readln(num1);
   write('Введите второе число: '); readln(num2);
   write('Введите третье число: '); readln(num3);
   writeln('Результат: ', sum(num1,num2,num3));
readln();
end.