кто поможет тому 17 балла нужно написать задачу в абс паскаль что бы мы вводили 19 и 5 и он выводил 4

var a,b,r:integer;

begin

writeln('Введите a,b');

readln(a,b);

r:=a-b-10;

writeln('r:',r);

end.

В Вашем случае: a=19, b=5, соответственно, r=4