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

Урок 14.2 Задача 1:

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

var
a, b, c: integer;                       // глобальные переменные
function sum (x, y, z: integer): integer; // функция принимает три числа
begin                                   // начало тела функции
  result := x + y + z;                  // результат для возврата наружу
end;                                    // конец тела функции
begin                                   // начало тела основной программы
  writeln('Введите три числа: ');
  readln(a, b, c);                      // считываем три числа
  writeln('Сумма: ', sum (a, b, c));    // сразу передаем три числа в функцию, получаем от нее результат и выводим на экран
  readln ();
end.

Вывод в консоли:

Введите три числа:
9
2
4
Сумма: 15