Составить алгоритм трех чисел A, B, C вывода суммы первого и второго и разности второго и третьего.

program zz1;

var a, b, c, d, m:integer; / / задаем переменные целого типа

begin

write (' введите первое число '); / / вводим с клавиатуры первое число

read (a);

write (' введите второе число '); / / вводим с клавиатуры второе число

read (b);

write (' введите третье число '); / / вводим с клавиатуры третье число

read (c);

d:=a + b; / / высчитываем сумму чисел

m:=b - c; / / высчитываем разность

writeln (' сумма первого и второго чисел = ', d);

writeln (' разность второго и третьего чисел = ', m);

end.