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

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

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

var a, b, c : integer;

procedure sum(x, y, z: integer);
begin
  writeln(x + y + z);
  end;
    begin
      write('vvedite tri 4isla - ');
      readln(a,b,c);
      sum(a,b,c);
      readln();
end.