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

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

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

var a, b, c: integer;
function sum(x, y, z: integer):integer;
begin
  result:= x + y + z;
end;
begin
  writeln('Vvedite 3 chisla: ');
    readln(a,b,c);
  writeln('Summa abc = ',sum(a,b,c));
  readln();
end.