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

Question

Информатика

Вадим

6 февраля, 10:05

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

+3

Ответы (1)

Знаете ответ на вопрос?

Надена · 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.