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

var
  a, b: integer;

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