Написать программу В магазине продается костюмная ткань. Ее цена В руб. за квадратный...

Question

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

Answer 1

//Pascal
var b,x:integer;

begin
  writeln('Цена за квадратный метр ');
  readln(b);
  writeln('Количество метров по ширине 80см ');
  readln(x);
  writeln('Стоимость куска ткани ', x*0.8*b);
end.