Написать программу на языке программирования паскаль и алгоритм представить в виде блок-схемы: даны три числа а, в, с на числовой оси. найти длины отрезков ав и ас и их сумму.

Паскаль:
var a,b,c, sum,d,k: integer;
begin
Writeln('Введите А');
readln(a);
Writeln('введите б');
readln(b);
Writeln('Введите С');
readln(c);
d:= b-a;
sum:=d;
k:=c-a;
sum:=sum+k;
Writeln('Сумма=',sum,'Длина AB=',d,'AC=',k);
end