Задача: ввести два числа a, b, c Найти сумму чисел и результат ввести на экран

program z1;

var a, b, c: integer;

begin

writeln ('Введите число a: '); / /вводим и считываем числа через консоль

readln (a);

writeln ('Введите число b: ');

readln (b);

writeln ('Введите число c: ');

readln (c);

writeln (a, ' + ', b, ' + ', c, ' = ', a + b + c); / /вычисляем и сразу выводим результат

end.