Написать программу вычисления стоимости некоторого количества (по весу) яблок. Нижепредставлен рекомендуемый вид экрана во время работы программы (данные, введенныепользователем, выделены полужирным шрифтом).

Вычисление стоимости покупки.
Введите исходные данные:
Цена одного килограмма яблок (руб.) = 8.5
Вес яблок (кг) = 2.3
Стоимость покупки: 19.55 руб

написать на Turbo Pascal.

Program appl;
var c,s,n:real;
begin
writeln(Вычисление стоимости покупки.);
writeln(Введите исходные данные:);
write(Цена одного килограмма яблок (руб.) = );
readln(c);
write(Вес яблок (кг) = );
readln(n);s:=c*n;
write(Стоимость покупки: ,s, руб);
end.

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.