25 . чиновник, ежемесячно берёт взятки в размере - вопрос №440039125 от karolina210 22.10.2020 07:46

Question

Информатика: 25 . чиновник, ежемесячно берёт взятки в размере х рублей. величина х непостоянная и колеблется от 0 до 150000 рублей. автомобиль bmw 3, который хочет купить на взятки чиновник, стоит 1700000 рублей. напишите программу, которая вычислит, сколько месяцев потребуется чиновнику на сбор нужной суммы не копипастить!

karolina210 · Answer

Var average, months: Real;
begin
average := (150000 + 0);
months := 1700000 / average;
write('В среднем чиновнику потребуется ');
write(months:5:2);
write(' месяцев.');
end.