Дана программа
program appl;

var
c, v: real; {цена и вес яблок}

st: real;{стоимость покупки}

begin

writeln('Вычисление стоимости покупки.');

writeln('введите исходные данные:');

write('Цена 1 кг яблок (руб.)->');

readln(c);

write('Вес яблок (кг)->');

readln(v);

st : = v * c;

writeln('Cтоимость покупки:', st:6:2, ' руб');

end.


Что такое writeln('Cтоимость покупки:', st:6:2, ' руб');