Помогите, СРОЧНО, задачу нужно написать в паскале, СРОЧНО ПОЖАЛУЙСТА

var m,k:integer; begin write('m k: '); readln(m,k); writeln(2*m+k) end.n не нужно вводить, проигрыши не влияют на количество очков :)