Составить программу вычисления произвольных последних цифр суммы a и b и разности чисел c и d

это программа для суммы двух чисел:

program summa;

var a,b,c: real;

begin

read (a,b);

c:=a+b;

write (c);

end.

это программа для разности двух чисел:

program raznost;

var a,b,c: real;

begin

read (a,b);

c:=a-b;

write (c);

end.