вывести на экран таблицу стоимости сыра в диапазоне от 100 до 1000 г,шагом=100,цена кг сыра 280 рублей...помогите пожалуйста
Ответы
Ответ дал:
0
program sir;
var y,x,h:real;
begin
x:=280;
h:=0.1;
while h<=1 do
begin
y:=x*h;
writeln('Цена за ',h*1000,' грамм ',y,' руб');
h:=h+0.1
end;
end.
Похожие вопросы
2 года назад
2 года назад
7 лет назад
7 лет назад
10 лет назад
10 лет назад
10 лет назад