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

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