71

Вывести на экран таблицу стоимости сыра в диапазоне от 100 до 1000 г, шагом=100, цена кг…

03 марта 2023

Вывести на экран таблицу стоимости сыра в диапазоне от 100 до 1000 г, шагом=100, цена кг сыра 280 рублей… помогитепожалуйста

категория: информатика

78

program sir; var y,x,h: real; beginx: =280; h: =0,1; while h <= 1 do begin y: =x*h; writeln ('Цена за ',h*1000,' грамм ',y,' руб'); h: =h+0,1 end; end.

Знаете ответ?

Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...