Question

пожалуйста помогите умоляю !!!

Answer 1

var

   a, b, R, M, K: Integer;

begin

   readln(a);

   readln(b);

   R := 3*b;

   M := 6*a;

   K := R+M;

   writeln(K);

end.