Вычислить y=a+b+c , применив: а) - процедуру ввода данных; - процедуру вычисления y; - процедуру вывода результата; - переменные; pascal abc

Var a,b,c,y:integer; // глобальные переменные
begin // начало программы
write('A, B, C: '); // вывод подсказки перед вводом данных
readln(a,b,c);  // ввод данных
y:=a+b+c;  / вычисление Y
writeln('Y = ',y); // вывод результата
end. // конец программы

Пример:
A, B, C: 8 3 5
Y = 16