Question

написать программу для вычисления цены ткани, количество и стоимость вводятся с клавиатуры Pascal

Answer 1

var
k, c: integer;
begin
write('Введите количество: ');
readln(k);
write('Введите стоимость: ');
readln(c);
writeln('Цена равна ', c/k);
end.