Напишите программу даны 4 числа a,b,c,d.найти разность этих чисел

Если будут вопросы пиши. 
var 
a,b,c,d: integer;
begin
readln(a,b,c,d);
 writeln(a-b-c-d) ;
end.