Урок 14 Задачf1

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

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

program  u14z1;

var a, b, c: integer;

function sum(x,y,z:integer): integer;

begin
result:=x+y+z;
end;

begin
  readln(a,b,c);
  write(sum(a,b,c));
  readln();
end.