Задача 2 Урок 14. Процедуры и функции

Урок 14. Процедуры и функции

{14 — 2 Напишите процедуру, которая выводит на экран сумму трёх целых чисел.}

var a, b, c: integer;
procedure sumOf3(x, y, z: integer);
begin
  writeln(x + y + z);
end;
begin
  writeln('write 3 nums');
  readln(a,b,c);
  sumOf3(a,b,c);
  readln();
end.

//write 3 nums
//3 12 23
//38