Question

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

Answer 1

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