Написать задачу в программе Паскаль.

В магазине продается костюмная ткань. Ее цена В рублей за квадратный метр. Составьте алгоритм и программу, которая подсчитает и выведет на экран стоимость куска этой ткани длинной Х метров и шириной 80 см

Question

Кируха

13 июля, 02:34

+5

Ответы (1)

Знаете ответ?

Артамоныч · Answer 1

Var

B, X:real;

Begin

Write ('B = ') ; ReadLn (B) ;

Write ('X = ') ; ReadLn (X) ;

Write ('Итоговая стоимость = ', X*B*0.8,' руб.')

End.