Кданному целому числу n добавили справа цифру k. на сколько процентов это число увеличилось ?

Program z1;
var n,k:integer;
begin
readln(n,k);
k:=n*10+k;
writeln(k/(n/100),'%');
end.