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

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

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

program task_1_lesson_14;
var a, b, c : integer;

function sum3(x , y, z:integer): integer;
begin
  result := x + y + z;
end;

begin
     writeln('vvedite 3 chisla');
     readln(a, b, c);
     writeln(sum3(a, b, c));
     readln();
end.