Вычислить стоимость кухонного гарнитура, содержащего четыре табурета и одного стола. стоимость изделий соответственно A и B Рублей, задача в паскале

var
  a, b: integer;

begin
  write(Стоимость табурета: ); readln(a);
  write(Стоимость стола: ); readln(b);
  writeln(Стоимость гарнитура равна , 4 * a + b, р.);
end.