Вмагазин купили 3 вида товара по 2 единицы каждого. введите с клавиатуры цены товаров, подсчитайте расходы и выведите их на экран. написать на языке программирования pascal abc.

Var
a,b,c : integer;
begin
writeln('введите цену 1-ого товара');
readln(a);
writeln('введите цену 2-ого товара');
readln(b);
writeln('введите цену 3-ого товара');
readln(c);
writeln('цена товаров:',(a+b+c)*2);
end.