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

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

Question

Аггей

30 июля, 14:55

+2

Ответы (1)

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

Люция · Answer 1

Var

B, X:real;

Begin

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

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

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

End.