Дана программа
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, ' руб');