
Вячеслав
7 год назад
Чиновник,ежемесячно берет взятки в размере Х рублей. Величина Х непостоянная и колеблется от 0 до 150000 рублей. Автомобиль BMW 3 , который хочет купить на взятки чиновник, стоит 1700000 рублей.Напишите программу,которая вычислит,сколько месяцев потребуется чиновнику на сбор нужной суммы.Используя цикл с постусловием
ОТВЕТЫ

Елеазар
Jul 14, 2019
Var
x, i: integer;
begin
x := 0;
i := 0;
repeat
i := i + 1;
x := x + random(0, 150000);
until x gt;= 1700000;
write(i);
end.
x, i: integer;
begin
x := 0;
i := 0;
repeat
i := i + 1;
x := x + random(0, 150000);
until x gt;= 1700000;
write(i);
end.
78
Смежные вопросы: